Ciao a tutti ,
ho una cartella excel 2003 con circa 100 fogli (nello specifico i fogli sono nominati con numeri). Ho necessità di individuare un foglio specifico e poterlo copiare o spostare. Si può fare? (se ,sì... come? )
Grazie,
zorea
Moderatori: Anthony47, Flash30005
Sub TrovaF()
For Each ws In Worksheets
If ws.Name = 3 Then '<<<numero del foglio
MsgBox ws.Name '<<<< al posto di Msgbox... fai eseguire l'azione che occorre
End If
Next ws
End Sub
Si può fare? (se ,sì... come?)
Sheets("IlNomeDelTuoFoglio").Select
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B2" Then
On Error GoTo Errore
Sheets(Target.Text).Activate
End If
Exit Sub
Errore:
MsgBox "Il nome del foglio: '" & Target.Text & "' è errato"
End Sub
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 10 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Macro che ricerca combinazioni che danno un valore Autore: kar64 |
Forum: Applicazioni Office Windows Risposte: 10 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 43 ospiti