La consultazione del forum è libera per tutti.
Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).
Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.
Buongiorno a tutti mi chiamo Enzo e sono alle prime armi con il VBA. Vengo subito al problema, ho creato una tabella per mio figlio dove vado a registrare i suoi esami. Ho inserito il codice per ogni tasto e funziona tutto bene. L’unico tasto che non mi soddisfa è il tasto Elimina perché come si vede dal codice nel file allegato mi elimina l’intera riga col rischio di eliminare anche parti di foglio che mi servono. Qualcuno mi potrebbe spiegare come fare ad eliminare solo le celle che io seleziono con la ricerca, nel caso in esempio solo Prova, 30 e 12? Grazie.
ciao
Private Sub CmdElimina_Click()
Dim Risp As String
Risp = MsgBox("Sei Sicuro?", vbYesNo + vbQuestion, "Avviso")
If Risp = vboNo Then
Call cmdReset_Click
Exit Sub
End If
Range(ActiveCell, ActiveCell.Offset(0, 2)).Delete (xlUp)
Call cmdReset_Click
End Sub
Ciao,
Ho risolto grazie infinite
