Moderatori: Anthony47, Flash30005
forse sono io che non riesco a spiegarmi vabbe troverò altro ciao
Function Ritardi(Estr, Ruota)
TotEstr = Range("A65536").End(xlUp).Row
RigEstr = Estr.Row
ColEstr = Ruota.Column
For I = RigEstr + 1 To TotEstr
For Y = ColEstr To ColEstr + 4
If Cells(I, Y) = Estr Then
Ritardi = I - RigEstr - 1
GoTo Fine
End If
Next Y
Next I
Ritardi = "-"
Fine:
End Function
Torna a Applicazioni Office Windows
| Estrazione e creazione foglio costi passivi dinamico Autore: danibi60 |
Forum: Applicazioni Office Windows Risposte: 35 |
| Excel apre solo una schermata bianca Autore: jameswilson |
Forum: Applicazioni Office Windows Risposte: 1 |
| programma convertitore e taglia file video e audio Autore: gianscooby |
Forum: Audio/Video e masterizzazione Risposte: 3 |
| Inserire add.in nella barra di avvio veloce in excel 2003 Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 4 |
Visitano il forum: Nessuno e 14 ospiti