Capy_Uther
New Member
- Joined
- May 14, 2023
- Messages
- 16
- Office Version
- 365
- Platform
- Windows
Hello to everyone on my excel im using a button to clear cells everytime i click it:
Sub BorrarTodo()
x = MsgBox("Se borrará todo el contenido de esta cotización", vbYesNo, "Eliminar Fila")
If x = vbYes Then
Range("G5").ClearContents
Range("A18:C44").ClearContents
Range("G4").Value = Range("G4") + 1
End If
End Sub
But on cells E18 to E44 are all drop down options, rite now when anything is selected on any of those drop downs manualy i go 1 by 1 and click the 1st option on the drop-down menu to make them blank again
Is there a way to use the same Clear button for reset to blank E18 to E44 cells ?
Sub BorrarTodo()
x = MsgBox("Se borrará todo el contenido de esta cotización", vbYesNo, "Eliminar Fila")
If x = vbYes Then
Range("G5").ClearContents
Range("A18:C44").ClearContents
Range("G4").Value = Range("G4") + 1
End If
End Sub
But on cells E18 to E44 are all drop down options, rite now when anything is selected on any of those drop downs manualy i go 1 by 1 and click the 1st option on the drop-down menu to make them blank again
Is there a way to use the same Clear button for reset to blank E18 to E44 cells ?