D
Daystrom
Hi:
I'm building a spreadsheet on a PC that contains a SpinButton with the
following code:
Private Sub SpinButton1_SpinDown()
Me.OLEObjects("SpinButton1").Object.Max = _
Range("TotalRecords").Value
Me.OLEObjects("SpinButton1").Object.Min = 4
Range("RowIndex").Value = Me.OLEObjects("SpinButton1").Object.Value
End Sub
Private Sub SpinButton1_SpinUp()
Me.OLEObjects("SpinButton1").Object.Max = _
Range("TotalRecords").Value
Me.OLEObjects("SpinButton1").Object.Min = 4
Range("RowIndex").Value = Me.OLEObjects("SpinButton1").Object.Value
End Sub
All it needs to do is update its maximum value from a cell on the worksheet
called "Total Records." (The minimum value is always 4.) Then it deposits its
value to a cell on the sheet named "RowIndex."
This all works really well on the PC, but when some users in my department
open the workbook on their Macs, the SpinButton isn't accessible, and the
code returns a bizarro error indicating that the OLE objects could not be
created. I did some digging around in the help menu, and it seems like this
uses ActiveX and, as a result, won't work on the Macs.
I don't really know much about this sort of thing. I've tried using a
standard spin control from the Forms toolbar (you know, that you can assign a
"cell link" to), but I can't figure out how to set its maximum value so that
it updates from the "TotalRecords" cell. (And even in the course of trying to
figure out THAT issue, I can't seem to write a macro that will run and leave
the control unselected when its done.)
I've far exceeded my stupidity threshold. If anyone could tell me what I'm
doing wrong, I'd really appreciate it. It seems like I should be able to do
something like this so that it runs well on both the PC and the Mac, but
clearly I can't. Help!
I'm building a spreadsheet on a PC that contains a SpinButton with the
following code:
Private Sub SpinButton1_SpinDown()
Me.OLEObjects("SpinButton1").Object.Max = _
Range("TotalRecords").Value
Me.OLEObjects("SpinButton1").Object.Min = 4
Range("RowIndex").Value = Me.OLEObjects("SpinButton1").Object.Value
End Sub
Private Sub SpinButton1_SpinUp()
Me.OLEObjects("SpinButton1").Object.Max = _
Range("TotalRecords").Value
Me.OLEObjects("SpinButton1").Object.Min = 4
Range("RowIndex").Value = Me.OLEObjects("SpinButton1").Object.Value
End Sub
All it needs to do is update its maximum value from a cell on the worksheet
called "Total Records." (The minimum value is always 4.) Then it deposits its
value to a cell on the sheet named "RowIndex."
This all works really well on the PC, but when some users in my department
open the workbook on their Macs, the SpinButton isn't accessible, and the
code returns a bizarro error indicating that the OLE objects could not be
created. I did some digging around in the help menu, and it seems like this
uses ActiveX and, as a result, won't work on the Macs.
I don't really know much about this sort of thing. I've tried using a
standard spin control from the Forms toolbar (you know, that you can assign a
"cell link" to), but I can't figure out how to set its maximum value so that
it updates from the "TotalRecords" cell. (And even in the course of trying to
figure out THAT issue, I can't seem to write a macro that will run and leave
the control unselected when its done.)
I've far exceeded my stupidity threshold. If anyone could tell me what I'm
doing wrong, I'd really appreciate it. It seems like I should be able to do
something like this so that it runs well on both the PC and the Mac, but
clearly I can't. Help!