LZMan1
06-02-2009, 05:48 PM
in excel visual basic how do you:
get a chart to print over 900 times
each time with different data
basically take info from row 1 and print then take info from row 2 and print.............and so on and so on.
thank you in advance
I need this to run and Range B49 to change to B50, B51 etc etc until there is no more data as well as Range (R49:AF49) and then have it print after it copies the data
Sub Macro1()
'
' Macro1 Macro
'
'
Range("B49").Select
Selection.Copy
Sheets("Chart").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Model Summary").Select
Range("R49:AF49").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Chart").Select
Range("G4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
Range("A1").Select
Application.CutCopyMode = False
End Sub
get a chart to print over 900 times
each time with different data
basically take info from row 1 and print then take info from row 2 and print.............and so on and so on.
thank you in advance
I need this to run and Range B49 to change to B50, B51 etc etc until there is no more data as well as Range (R49:AF49) and then have it print after it copies the data
Sub Macro1()
'
' Macro1 Macro
'
'
Range("B49").Select
Selection.Copy
Sheets("Chart").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Model Summary").Select
Range("R49:AF49").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Chart").Select
Range("G4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
Range("A1").Select
Application.CutCopyMode = False
End Sub