I want to define title rows -1004 ...
 

Hi,

I need to define title rows via VBA (Excel 2002).
---
Dim objWS As Worksheet
Set objWS = ActiveWorkbook.Worksheets("Stueckliste")

' ActiveWorkbook.Worksheets("Stueckliste").Select

objWS.Activate

With objWS.PageSetup
' .PrintTitleRows = objWS.Rows("1:11").Address <--- 1004
.PrintTitleRows = "$1:$11"
<--- 1004
.PrintTitleColumns = ""
---
On some PCs I get the error "1004 - Die PrintTitleRows-Eigenschaft des
PageSetup-Objektes kann nicht festgelegt werden".
(I do not know what is the exactly description in English).
On my own PC (and other ones) this is no problem!
I do not know what is the problem.
Has anyone an idea what goes wrong?

Thank you
Regards Kerstin

I want to define title rows -1004 ...
 

Please check whether printer is installed in other PCs

If this post helps click Yes
---------------
Jacob Skaria

"Kerstin Schiebel" wrote:

Hi,

I need to define title rows via VBA (Excel 2002).
---
Dim objWS As Worksheet
Set objWS = ActiveWorkbook.Worksheets("Stueckliste")

' ActiveWorkbook.Worksheets("Stueckliste").Select

objWS.Activate

With objWS.PageSetup
' .PrintTitleRows = objWS.Rows("1:11").Address <--- 1004
.PrintTitleRows = "$1:$11"
<--- 1004
.PrintTitleColumns = ""
---
On some PCs I get the error "1004 - Die PrintTitleRows-Eigenschaft des
PageSetup-Objektes kann nicht festgelegt werden".
(I do not know what is the exactly description in English).
On my own PC (and other ones) this is no problem!
I do not know what is the problem.
Has anyone an idea what goes wrong?

Thank you
Regards Kerstin

I want to define title rows -1004 ...
 

YES :-))))
(the actual default printer had a problem with the connection)

Thank you very much!
Kerstin

"Jacob Skaria" schrieb im
Newsbeitrag ...
Please check whether printer is installed in other PCs

If this post helps click Yes
---------------
Jacob Skaria

....