** scrolled LPARAMETERS nDirection ** I would first try with =m.this.ShowMeProperly() ** next, if this works, add inlist(m.nDirection, 6, 7) && =inlist(m.nDirection, 6, 7) and m.this.ShowMeProperly()would become
** scrolled LPARAMETERS nDirection =inlist(m.nDirection, 6, 7) and m.this.ShowMeProperly()to indicate that it is only to be executed when there's been a click in the horizontal scrollbar
** scrolled LPARAMETERS nDirection =m.this.I_Have_Columns_That_are_not_visible and inlist(m.nDirection, 6, 7) and m.this.ShowMeProperly()And we use that expression too over here: It is a soup = it is messed up