Hiding tab code not recognizing number generated from Active X control

[Newport Count]

Hi there,

I have added the following basic code to auto hide certain tabs in a spreadsheet, based on a cell value in a specific tab (cell C30):

Private Sub Worksheet_Change(ByVal Target As Range)

If [C30] = "58" Then
Sheets("Apr 2018 Correction Detail").Visible = True
Else
Sheets("Apr 2018 Correction Detail").Visible = False
End If

If [C30] = "57" Then
Sheets("Mar 2018 Correction Detail").Visible = True
Else
Sheets("Mar 2018 Correction Detail").Visible = False
End If

End Sub

This works ok when I manually enter these numbers into the cell, but not when they are generated from an Active X control that populates via a cell link.

Any ideas? No formatting seems to work.


Cheers,
Rich

 

[Fluff]

ActiveX controls do not trigger Change events. You'll need to run the code from the activeX control.

 

[Newport Count]

aha! thanks for the advice - added to the activex control and works ok

 

[Fluff]

Glad to help & thanks for the feedback