ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   How do I use a variable in the place of a sheet name (https://www.excelbanter.com/excel-programming/358018-how-do-i-use-variable-place-sheet-name.html)

FCLinux

How do I use a variable in the place of a sheet name
 
In the following code snippet, from a macro I am writing, how do I use
name as a variable rather than a predefined sheet name in this code
line - ActiveCell.Offset(row, col).FormulaR1C1 = "=name!RC*1.0"


Sample code snippet from my Excel macro

Do While ActiveCell.Offset(0, col) < ""
row = 2
Do While ActiveCell.Offset(row, col - 1) < ""
ActiveCell.Offset(row, col).FormulaR1C1 = "=name!RC*1.0"
row = row + 1
Loop
DoEvents
col = col + 1
Loop



Niek Otten

How do I use a variable in the place of a sheet name
 
ActiveCell.Offset(row, col).FormulaR1C1 = "=" & name & "!RC*1.0"

--
Kind regards,

Niek Otten

"FCLinux" wrote in message om...
In the following code snippet, from a macro I am writing, how do I use name as a variable rather than a predefined sheet
name in this code line - ActiveCell.Offset(row, col).FormulaR1C1 = "=name!RC*1.0"


Sample code snippet from my Excel macro

Do While ActiveCell.Offset(0, col) < ""
row = 2
Do While ActiveCell.Offset(row, col - 1) < ""
ActiveCell.Offset(row, col).FormulaR1C1 = "=name!RC*1.0"
row = row + 1
Loop
DoEvents
col = col + 1
Loop





Rick Hansen

How do I use a variable in the place of a sheet name
 
Good Morning,

if name variable is s string type variable, this should do the trick for
you..

enjoy, Rick


Dim name as string

ActiveCell.Offset(row, col).FormulaR1C1 = "=" & name" & "!RC*1.0"




"FCLinux" wrote in message
om...
In the following code snippet, from a macro I am writing, how do I use
name as a variable rather than a predefined sheet name in this code
line - ActiveCell.Offset(row, col).FormulaR1C1 = "=name!RC*1.0"


Sample code snippet from my Excel macro

Do While ActiveCell.Offset(0, col) < ""
row = 2
Do While ActiveCell.Offset(row, col - 1) < ""
ActiveCell.Offset(row, col).FormulaR1C1 =

"=name!RC*1.0"
row = row + 1
Loop
DoEvents
col = col + 1
Loop






All times are GMT +1. The time now is 02:46 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com