VBA syntax

D

dhstein

I have some code in a macro that was recorded like this:
TableDestination:="[MyWorkbook.xlsm]Sales!R5C1"

I would like to replace Myworkbook.xlsm with "ActiveWorkbook

Is this the syntax:

TableDestination:="[ActiveWorkbook]Reorder!R5C1" ?

OR

TableDestination:="ActiveWorkbook.Reorder!R5C1"

OR something else?

Thanks for any help on this
 
S

Sheeloo

ActiveWorkbook.Sheets("Sales").Cells(5, 1)

it has to be of the form
workbook.worksheet.range
 
J

Jarek Kujawa

try:

Dim k as String
k = "'[" & ThisWorkbook.Name & "]Reorder'!R5C1"
TableDestination:= k
 
D

Dave Peterson

I like to let excel's vba take care of the syntax.

dim DestCell as range
set destcell = workbooks("myworkbook.xlsm").worksheets("sales").cells(5,1)
or this--it doesn't matter if you use .cells() or .range()
set destcell = workbooks("myworkbook.xlsm").worksheets("sales").range("a5")
or
set destcell = activeworkbook.worksheets("sales").range("a5")
or (if you're running from the correct worksheet)
set destcell = activesheet.range("a5")

....tabledestination:=destcell.address(external:=true), ...



I have some code in a macro that was recorded like this:
TableDestination:="[MyWorkbook.xlsm]Sales!R5C1"

I would like to replace Myworkbook.xlsm with "ActiveWorkbook

Is this the syntax:

TableDestination:="[ActiveWorkbook]Reorder!R5C1" ?

OR

TableDestination:="ActiveWorkbook.Reorder!R5C1"

OR something else?

Thanks for any help on this
 
Top