Quantcast
Channel: VBForums - ASP, VB Script
Viewing all articles
Browse latest Browse all 688

VB Script to drag column down to last row of column A

$
0
0
Hi Folks -

I'm struggling with a solution to be able to drag down a formula in column N3 down to the last row of data for Column A.

Here is what I have thus far:

Code:

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True

Set objWorkbook1= objExcel.Workbooks.Open("C:\Users\chtakac\Documents\Z\ZZ\Employees Accessxls")
Set objWorksheet = objWorkbook1.Worksheets("Sheet1")
       
Set sourceRange = objWorksheet.Range("A")
Set fillRange = objWorksheet.Range("N3:N30")
sourceRange.AutoFill fillRange


objWorkbook1.Save
objWorkbook1.Close

As you can see, I can' set a hardcoded range, but I dont want to do that. I need it dynamic.
Can anyone please assist?

Viewing all articles
Browse latest Browse all 688

Latest Images

Trending Articles



Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>