Hello Friends,
I need help in building a code that enables me to export rows from Excel
worksheet to a SharePoint list.
Please see attached. I inserted a button. Once the button is clicked, data
in row 2 should copy over to SharePoint list. On the SharePoint list a new
item should be appended.
can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-
____________
From: Prashant Pawle
To: excel-macros@googlegroups.com
Sent: Sun, November 11, 2012 2:54:25 AM
Hi Prashant
I Hope This will help you.
Public Sub Test()
Dim wks As Worksheet
Dim intCol As Integer
Dim intRow As Integer
Dim intRAs Integer
intR = 1
For Each wks In ThisWorkbook.Worksheets
If wks.Name <> "output" Then
For intCol = 1 T
Dear Ashish,
Thanks for the below code.
But I need to get output as shown in the attached sheet & code should list
all narrow cells in that workbook.
Regards
Prashant
On Sun, Nov 11, 2012 at 12:40 PM, ashish koul wrote:
>
> Sub sample1()
> Dim wk As Worksheet
> Dim cl As Range
> Set wk = Act
Sub sample1()
Dim wk As Worksheet
Dim cl As Range
Set wk = ActiveSheet
For Each cl In wk.UsedRange.Columns
If IsNumeric(cl.Cells(2, 1).Value) And Left(cl.Cells(2, 1).Text, 1) =
"#" Then
MsgBox cl.Address(0, 0)
End If
Next
End Sub
On Sun, Nov 11, 2012 at 1:23 PM, Prashant Pawl
Dear Team,
Need a code for listing cell references from all sheets which have too
narrow column width(#).
Sample file attached
Regards,
Prashant
--
Join official facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES (1120+ members already BANNED for violation)
Try
Sub import()
Dim wkb As Workbook
Dim z As Long
Dim flpath As String
Set wkb = Workbooks.Open(Application.GetOpenFilename("Excel File
(*.xls*)," & "*xls*"))
z = ThisWorkbook.Sheets(1).Range("a65356").End(xlUp).Row + 1
ThisWorkbook.Sheets(1).Range("a" & z).Value = wkb.Sheets(1).textbox1.Value
Th
Dear Team
Needs your support. Please find attached two workbooks, description are as
follows:
1. *AMR FORM* - that I used to received from different locations.
2. *Database *- that is the database to store data from *AMR FORM* workbook.
I want the macro code in the *database* sheet linked to
Hi,
I am looking for solution to below:-
I receive No. of emails from some people asking for tax advise in Outlook
2003.
Then I create tax advice and I attach the file.
I need to reply to the email received below:-
Hi *Sender*(as per email),
As requested, please find attached below payslip s
Hi Kaushik
can you send both sample workbook which r link.
Thanks
Mahesh
On Mon, Aug 1, 2011 at 5:59 PM, KAUSHIK SAVLA wrote:
> Hi All,
>
> Vba code required to link whole workbook (every cell of workbook) to
> another workbook.
>
> Regards,
> Kaushik
>
> --
>
> ---
Hi Rajan,
I want to get it in another new workbook not in the same workbook.
Please help on this.
Regards,
Kaushik
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
htt
h.Range(st).Activate
ActiveCell.Value = sh.Name & st
End Sub
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of KAUSHIK SAVLA
Sent: Monday, August 01, 2011 6:00 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Vba Code required to link
It will take a lot of time initially.
If there is any code or formula then would be helpful very much.
Regards,
Kaushik
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
Hi,
Just Try Manual Linking Once after that just update...
*Best Regards,*
*Venkat*
*Chennai*
*
*
On Mon, Aug 1, 2011 at 5:59 PM, KAUSHIK SAVLA wrote:
> Hi All,
>
> Vba code required to link whole workbook (every cell of workbook) to
> another workbook.
>
> Regards,
> Kaushik
>
> --
>
> ---
Hi Friends,
It is taking too long to delete the Zero value cells ans its rows.
Is there any way to select all the Zero value in a particular rows and
remove(Delete) from sheet.
Regards,
Prabhu
--
--
Some important
Thanks Rajan.
It works perfectly
Regards,
Kaushik
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://
Attached Your File with that Codes
thanks
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of KAUSHIK SAVLA
Sent: Thursday, July 28, 2011 6:14 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Vba Code required
Thanks Rajan,
But Vba
ehalf Of NOORAIN ANSARI
Sent: Thursday, July 28, 2011 12:31 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Vba Code Required for Delete Entire Row
Dear Arpit,
Please try below code to delete row equal to 0 in J Column..
Sub delete_row()
dim i,j as long
applica
Thanks Rajan,
But Vba is not ending. It is giving me debug required at End If in Vba Code,
further the totals are also not tying after Vba Code applying.
Please do the needful by looking it again.
Regards,
Kaushik
--
-
mailto:excel-macros@googlegroups.com]
On Behalf Of KAUSHIK SAVLA
Sent: Thursday, July 28, 2011 3:50 PM
To: excel-macros@googlegroups.com
Subject: Fwd: $$Excel-Macros$$ Vba Code required
-- Forwarded message --
From: KAUSHIK SAVLA
Date: Thu, 28 Jul 2011 11:40:35 +1000
Subject: $$Ex
macros@googlegroups.com]
On Behalf Of arpit rajput
Sent: Thursday, July 28, 2011 2:50 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Vba Code Required for Delete Entire Row
Hi Experts,
I want to remove entire row when each cell value =0 in column J see in
attached file.
Anybody sugg
Dear Arpit,
please try below code..it will be help to delete all row of J
column
Sub delete_row()
Dim i, j As Long
Application.ScreenUpdating = False
j = Application.WorksheetFunction.CountA(Sheet22.Range("J:J"))
For i = j To 1 Step -1
If Sheet22.Cells(i, 10).Value = 0 Then
Sheet22.Ra
t;> ** **
>>
>> Regards.
>>
>> Daniel
>>
>> ** **
>>
>> *De :* excel-macros@googlegroups.com [mailto:
>> excel-macros@googlegroups.com] *De la part de* arpit rajput
>> *Envoyé :* jeudi 28 juillet 2011 11:20
>> *À :* excel-macr
w.Delete
>
> .AutoFilter.Range.AutoFilter
>
> End With
>
> End Sub
>
> ** **
>
> Regards.
>
> Daniel
>
> ** **
>
> *De :* excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
> *De la part de* arpit raj
Thanks Noorain for your quick respond.
It will not delete all rows properly at one time, about 50% 0 values row
penidng at the time of appling logic first time. i made some change but its
going hang. can you please modify it.
Sub delete_row()
dim i,j as long
application.screenupdating=false
cel-macros@googlegroups.com
Objet : $$Excel-Macros$$ Vba Code Required for Delete Entire Row
Hi Experts,
I want to remove entire row when each cell value =0 in column J see in
attached file.
Anybody suggest me VBA code to delete all 0 value rows.
Thanks
A
Dear Arpit,
Please try below code to delete row equal to 0 in J Column..
Sub delete_row()
dim i,j as long
application.screenupdating=false
j=application.worksheetfunction.counta(sheet22.range("J:J"))
for i=1 to j
if sheet22.cells(i,10).value=0 then
sheet22.range("J"&i).EntireRow.Delete
end if
>
> can you attach sample data. also is the data that you want to compare will
> have unique values.
>
>
>
> --
> Date: Fri, 12 Nov 2010 13:09:02 +0530
> Subject: $$Excel-Macros$$ VBA Code Required
> From: shrinivas...@gmail.com
>
Dear Members
Please Help me I am waiting for reply
shrinivas
Date: Fri, 12 Nov 2010 13:09:02 +0530
Subject: $$Excel-Macros$$ VBA Code Required
From: shrinivas...@gmail.com
To: excel-macros@googlegroups.com
Dear All
Can Anyone help me for following problem.
I want to compare 2 column
Hi All,
Can anyone help me providing the code for sending an excel attachment to be
automatically updated in the Lotus notes in a Text format(Not as
a Pictorial image or bit map.
Thanks,
Harish
--
--
Some important
Dear All
Can Anyone help me for following problem.
I want to compare 2 column (which are in different different file).
Example, Consider File "A" and File "B" I want to compare column of (File A
,sheet 1, column X) to (File B, sheet 2, Column Y)
There are chances that in (File A ,sheet 1, column X)
Hi Team,
Here I have a requirement to copy folder from one location to another
location which is contain a specific Name.
Ex:
I Have a folder AAA
AAA has 3 Subfolder as aaa1, aaa2, aaa3.
All the above said subfolders contains Each 2 Folders as (aaa1_Input &
aaa1_Output, aaa2_Input & aaa2_Outpu
hope this helps,
Paul
- Original Message ----
> From: Mari
> To: MS EXCEL AND VBA MACROS
> Sent: Tue, September 21, 2010 12:06:28 AM
> Subject: $$Excel-Macros$$ VBA code required for Folder activity
>
> Hi Team,
>
>
Hi Team,
I have different files in different subfolder in a main folder. Now I
wish to collate all subfolder files to the Mainfolder. The macro has
to go inside each and every subfolder and copy the files and paste it
to a new folder.
As a result of this the all files has to be pasted in one Fold
MODULE1
Option Explicit
'In input box assign the path i.e c:\tc\bin
'for more help u can contact directly at rfhyd1...@gmail.com
Sub Batch_Print()
Dim Input_Dir, Print_File As String
Input_Dir = InputBox _
("Input directory path containi
Hi Excel Gurus,
Many image files(tif)(say 200 files) will be pasted in a particular folder
through fax server and i need to take printout of the same and also keep a
log/list of image that has been printed.
Can a code be created such that i can click a button and the files from that
printer are p
36 matches
Mail list logo
