newolduser

Elsa Matilde respondió: Podes utilizar estas rutinas en cada ListBox. Aquí te dejo el ejemplo para el 1ro: Private Sub ListBox1_Click() 'x Elsamatilde ListBox2.ListIndex = -1 ListBox3.ListIndex = -1 End Sub La idea es que al hacer clic en alguno, se quitan en los demás...

jrgces respondió: Por ejemplo, para que la la celda A1 de Hoja1 aumente en una unidad por cada optionbutton del formulario que tenga el valor TRUE al ejecutar el código, el código sería: Dim objCtr As MSForms.Control For Each objCtr In Me.Controls If TypeOf objCtr Is...

Isaac Reyes respondió: Aquí tienes uno que es menos eficiente, pero igualmente eficaz y más general. Saludos... Sub subElim() Application.DisplayAlerts = False elim = 1 For i = 1 To Sheets.Count If Left(Sheets(elim).Name, 4) = "Hoja" Then Sheets(elim).Delete Else elim =...