Identifying Listboxes

[dmqueen]

Good Morning,

I am trying to copy the selected item from listboxes on 57 sheets in a workbook. Many of them are repeated, but are in different places on the worksheets. What's the easiest way?

In psueocode I'v got:

If ListboxMachines Then
Application.NewRowNum & MachineColumn.Select.Value = ListboxMachines.BoundItem
Else If ListBox PressMachines Then
Application.NewRowNum & PressMachinesColumn.Value = ListBoxPressMachines.BoundItem
End If

If ListBoxGrooveFinish Then
Application.(NewRowNum & GrooveFinishColumn).Select.Value = ListBoxGrooveFinish.BoundItem
End If

If ListboxRotation Then
Application.(NewRowNum & RotationColumn).Select.Value = ListBoxRotation.BoundItem
End If

If ListboxStackableThen
Application.(NewRowNum & StackableColumn).Select.Value = ListBoxStackableBoundItem
End If
If ListBoxMatchedReach Then
Application.(NewRowNum & MatchedReachColumn).Select.Value = ListBoxMatchedReach.BoundItem
End If

If ListboxDesignSoftware Then
Application.(NewRowNum & DesignSoftwareColumn).Select.Value = ListBoxDesignSoftware.BoundItem
End If

But of course this won't work in the slightest, I only explains what I want to do. The columns are unknown and different on every sheet going in. Suggestions?