innazi tutto ancora grazie per la vostra disponibilità...
i numeri li inserisco io
potrebbe anche andare bene una macro, perchè per l'inserimento dei numeri in colonna A uso una tastiera formata da 11 pulsanti con le macro che con il semplice click sul numero che devo inserire lo mette appunto in colonna, quindi una macro che potrebbe anche fare il calcolo dei ritardi, la potrei benissimo inserire sotto a quella dell'iserimento del numero
ti faccio un esempio della macro che ho per l'inserimento del numero 1
- Codice: Seleziona tutto
Sub numero_1()
ActiveSheet.Unprotect Password:="abc"
volte = ActiveCell.Row
ActiveCell = "1"
Cells(volte + 1, 1).Select
ActiveSheet.Protect Password:="abc"
End Sub
con questa macro viene tolta prima la protezione al foglio di lavoro e poi va ad inserire nella cella selezionata (nostro caso colonna A) il numero 1, poi si posiziona nella cella sottostante, pronta per ricevere un altro numero e rimette la protezione al foglio
la protezione del foglio mi serve solo perchè se dovessi cliccare su un punto qualsiasi del foglio, (selezionando appunto una cella) e poi clicco sul numero da inserire, i numero verrebbe inserito non dove vorrei ma nel punto cliccato per errore...
a questo punto, e prima della protezione si potrebbe anche inserire una macro che faccia i calcoli come e dove vuole, e poi potrei benissimo concluderla con questa altra macro che mi riporterebbe la selezione subito sotto all'ultima cella usata
- Codice: Seleziona tutto
Dim i As Integer
For i = 1 To 1000
If IsEmpty(Cells(i, 1).Value) Then
Cells(i, 1).Select
Exit Sub
End If
Next
quindi per riassumere una possibile macro potrebbe essere:
- Codice: Seleziona tutto
Sub numero_1()
ActiveSheet.Unprotect Password:="abc"
volte = ActiveCell.Row
ActiveCell = "1"
Cells(volte + 1, 1).Select
IN MEZZO A QUESTE 2 POTREBE STARCI LA MACRO CHE CALCOLA I RITARDI
Dim i As Integer
For i = 1 To 1000
If IsEmpty(Cells(i, 1).Value) Then
Cells(i, 1).Select
Exit Sub
End If
Next
ActiveSheet.Protect Password:="abc"
End Sub
così ad ogni inserimento di un numero partirà in automatico anche la macro che calcola i ritardi
spero mi sia spiegato bene....
grazie in anticipo