Boa tarde amigos,
Possuo uma macro para uma ComboBox, que funciona muito bem, porém tenho exatamente 112 ComboBox na planilha e colocar a mesma macro individualmente para cada uma deixou a execução muito lenta. existe uma forma de escrever uma só macro e fazer com que todas as ComboBox assimilem essa macro?
*Em outras palavras, ao invés de uma macro "Private Sub ComboBox1", outra macro: "Private Sub ComboBox2"... até a 112, criar apenas uma (já que são iguais) para todas seguirem.
Abaixo a macro em questão (que habilita sair da ComboBox teclando Enter ou Tab):
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
Planilha2.ComboBox1.Activate
ElseIf KeyCode = vbKeyTab Then
Planilha2.ComboBox1.Activate
End If
End Sub
Obrigado!!
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E