ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   PrintOut workSheet (https://www.excelbanter.com/excel-programming/315917-printout-worksheet.html)

excelFan

PrintOut workSheet
 
Hi all,
in the following code
....
activeWorkbook.WorkSheets.Item(activeWorkbook.Work Sheets.Cout).PrinOut
....
Nothing happen, i.e No print out produced !
But when changed for example to :
....
activeWorkbook.WorkSheets.Item(4).PrintOut
.....
Things work fine , i.e the print will be produced
any explanation and help please.
thanks




DKY[_27_]

PrintOut workSheet
 

well, I know nothing about VBA, but I did notice that "cout" needs an
and "prinOut" needs a t. Also, should there be a space between Wor
and Sheets? I'm just asking, like I said, I don't know much about thi
stuff. So maybe make it look like this?

activeWorkbook.WorkSheets.Item(activeWorkbook.Work Sheets.Count).PrintOu

--
DK
-----------------------------------------------------------------------
DKY's Profile: http://www.excelforum.com/member.php...fo&userid=1451
View this thread: http://www.excelforum.com/showthread.php?threadid=27570


excelFan

PrintOut workSheet
 
thanks, DKy for your observations
But in my actual coding
typing was ok no errors, count with "n" and PrintOut with "t" and there
should be no space in worksheets
thanks again.


"DKY" wrote:


well, I know nothing about VBA, but I did notice that "cout" needs an n
and "prinOut" needs a t. Also, should there be a space between Work
and Sheets? I'm just asking, like I said, I don't know much about this
stuff. So maybe make it look like this?

activeWorkbook.WorkSheets.Item(activeWorkbook.Work Sheets.Count).PrintOut


--
DKY
------------------------------------------------------------------------
DKY's Profile: http://www.excelforum.com/member.php...o&userid=14515
View this thread: http://www.excelforum.com/showthread...hreadid=275707



excelFan

PrintOut workSheet
 
DKY,

i think my problem was to add the new sheet (which to be printed )
to the end i.e to the right of list, so that's what i did

dim Nsht as worksheet
if Nsht is Nothing Then
worksheets.add after:= Worksheets(Worksheets.count)
end if

.....The rest of coding for printing just worked fine
thanks DKY, any further thoughts are welcome


"DKY" wrote:


well, I know nothing about VBA, but I did notice that "cout" needs an n
and "prinOut" needs a t. Also, should there be a space between Work
and Sheets? I'm just asking, like I said, I don't know much about this
stuff. So maybe make it look like this?

activeWorkbook.WorkSheets.Item(activeWorkbook.Work Sheets.Count).PrintOut


--
DKY
------------------------------------------------------------------------
DKY's Profile: http://www.excelforum.com/member.php...o&userid=14515
View this thread: http://www.excelforum.com/showthread...hreadid=275707




All times are GMT +1. The time now is 03:48 PM.

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