bar below page tabs problem

[IanJG]

I have a problem on a clients computer that runs a complete excel spreadsheet with significant VBA coding.
occasionally a bar (large white space ) appears at the bottom of the window below the buttons , ready across to 100%.
when this happens functionality of the workbook stops. it can be resolved when it occurs by minimizing the window and expanding it again.
It only happens on clients machine, not mine when i am coding improvements etc.
Any ideas what might be causing it and what a fix might be.
does happen all the time but might happen for a week twice a day then stop form a month.
HELP, thanks

 

[mole999]

Have you managed to narrow down in the code where this happens

 

[IanJG]

Have you managed to narrow down in the code where this happens

i don't think it is in the vba code because the sheets get used numerous times every day, and this happens only sometimes and only on clients machine is it was in the code it should happen on my computer as well.

 

[IanJG]

An image can be found at

https://drive.google.com/file/d/0B_GH7IWqZ770RHFnVzJ6OWhIVWs/view?usp=sharing

 

[mole999]

do you run at 100% and they at 190% views ?. Seen some stage effects when different zooms are used, not always expected

 

[IanJG]

do you run at 100% and they at 190% views ?. Seen some stage effects when different zooms are used, not always expected

Zoom doesn't get adjusted

 

[IanJG]

The issue appears to happen after printing from the print preview generated by this code, but only on clients computer.

image from todays testing is at https://drive.google.com/open?id=0B_GH7IWqZ770cVNHSXlqbkh4VEU

This code has been in place for months with no problem, that is why i don't think it is the code i think it is some sort of bug or incompatibility issue

[FONT=Calibri]Private SubCommandButton1_Click()[/FONT]
[FONT=Calibri] [/FONT]
[FONT=Calibri]Call printers[/FONT]
[FONT=Calibri]ThisWorkbook.Sheets("DataSheet").Range("DATASHEETTYPE") = "WORKSHEET"[/FONT]
[FONT=Calibri]ThisWorkbook.Sheets("DataSheet").Range("datasheetindex") = ""[/FONT]
[FONT=Calibri]DATALOGGINGFORM.Hide[/FONT]
[FONT=Calibri]ActiveWorkbook.Save[/FONT]
[FONT=Calibri]ActiveWorkbook.Sheets("DataSheet").Activate[/FONT]
[FONT=Calibri]Application.ActivePrinter= whichprinter[/FONT]
[FONT=Calibri]ActiveSheet.PrintOut_[/FONT]
[FONT=Calibri]From:=1, _[/FONT]
[FONT=Calibri]To:=1, _[/FONT]
[FONT=Calibri]Copies:=1, _[/FONT]
[FONT=Calibri][B]Preview:=True, _[/B][/FONT]
[FONT=Calibri]ActivePrinter:="",_[/FONT]
[FONT=Calibri]PrintToFile:=False,_[/FONT]
[FONT=Calibri]Collate:=True, _[/FONT]
[FONT=Calibri]PrToFileName:="",_[/FONT]
[FONT=Calibri]IgnorePrintAreas:=False[/FONT]
[FONT=Calibri]ThisWorkbook.Sheets("DataSheet").Range("DATASHEETTYPE") = ""[/FONT]
[FONT=Calibri]ThisWorkbook.Sheets("DataSheet").Range("datasheetindex") = ""[/FONT]
[FONT=Calibri]DATALOGGINGFORM.Show[/FONT]
[FONT=Calibri]End Sub[/FONT]

 

[mole999]

PrintPreview sometimes causes hiccups I recall, and I can't see why it needs to be used in the print routine