Ciao,
vorrei un aiuto per scrivere una macro che inserisce la data al giorno precedente in una cella del foglio XL.
Grazie in anticipo.
Moderatori: Anthony47, Flash30005
Sheets("QualeFoglio").Range("QualeRange").value = int(now)-1
Sub data()
Sheets("Foglio1").Range("A1").Value = Int(Now) - 1
End Sub
Sub data()
If Sheets("Foglio1").Range("A1").Value = "" then
Sheets("Foglio1").Range("A1").Value = Int(Now) - 1
End Sub
Mario, io ho capito che l'utente ha gia' una macro che "aggiorna una serie di valori", quindi bisogna solo inserire la data.
Questo si puo' ottenere aggiungendo al codice esistente la riga
- Codice: Seleziona tutto
Sheets("QualeFoglio").Range("QualeRange").value = int(now)-1
In assenza di informazioni sulla struttura dei dati si puo' solo rimanere sul generico, Making adattera' al suo caso.
Torna a Applicazioni Office Windows
Macro per copiare testo e salvare in blocco note in formato Autore: kiuba |
Forum: Applicazioni Office Windows Risposte: 12 |
Visitano il forum: Nessuno e 15 ospiti