Hi Robert,

thanks for your reply, but I can only find a reference to the
AfterUpdate event. This will be triggered after the content
changed.

My code looks like this

sub print (values as collection)
for each val in collection
ActiveWorkbook.Sheets("SheetName").TheComboBox.Val ue = val
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
next
end sub

The first printout shows the expected value in the combobox. For
the other printouts Change events (even for the combobox) are called
and the sheet is updated but the ComboBox-display remains
unchanged. How should I use the AfterUpdate?

Thanks
Peter