Note: The other languages of the website are Google-translated. Back to English

Come creare un calendario in Excel?

Il calendario in Excel è un oggetto utile. Con un calendario in Excel, puoi registrare molti messaggi nel calendario. Ad esempio: la data in cui un nuovo dipendente è entrato in azienda, la data in cui la merce è stata consegnata e così via. Con il calendario, questi messaggi appariranno visivi e semplici. Come creare un calendario mensile o un calendario annuale in Excel?

Crea un calendario annuale scaricando i modelli di calendario Excel

Crea un calendario mensile con codice VBA

Crea rapidamente un calendario mensile o annuale con Kutools per Excel

Scheda Office Abilita la modifica a schede e la navigazione in Office e semplifica notevolmente il lavoro ...
Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%
  • Riutilizza qualsiasi cosa: Aggiungi le formule, i grafici e qualsiasi altra cosa più usati o complessi ai tuoi preferiti e riutilizzali rapidamente in futuro.
  • Più di 20 funzioni di testo: Estrai numero dalla stringa di testo; Estrai o rimuovi parte di testi; Converti numeri e valute in parole inglesi.
  • Unisci strumenti: Più cartelle di lavoro e fogli in uno; Unisci più celle / righe / colonne senza perdere dati; Unisci righe duplicate e somma.
  • Strumenti di divisione: Suddivisione dei dati in più fogli in base al valore; Una cartella di lavoro su più file Excel, PDF o CSV; Da una colonna a più colonne.
  • Incolla Salto Righe nascoste / filtrate; Count And Sum di Background Color; Invia e-mail personalizzate a più destinatari in blocco.
  • Super filtro: Crea schemi di filtri avanzati e applicali a qualsiasi foglio; Riordina per settimana, giorno, frequenza e altro; Filtro in grassetto, formule, commenti ...
  • Più di 300 potenti funzionalità; Funziona con Office 2007-2021 e 365; Supporta tutte le lingue; Facile implementazione nella tua azienda o organizzazione.

freccia blu freccia destraCrea un calendario annuale scaricando i modelli di calendario Excel

Con questo metodo, devi assicurarti che il tuo computer si colleghi alla rete, in modo da poter scaricare il file Modelli di calendario.

Vai su Compila il , fare clic su New nel riquadro di sinistra e fare clic su Calendario da Modelli Office.com. Vedi screenshot:

doc-crea-calendario1

Quindi puoi scegliere una cartella del calendario e fare clic su di essa, ci saranno diversi stili del calendario, selezionane uno che ti piace e fai clic Scaricare pulsante nel riquadro di destra.

Dopo aver scaricato il modello di calendario, otterrai il calendario in una nuova cartella di lavoro.


freccia blu freccia destra Crea un calendario mensile con codice VBA

Con il seguente codice VBA, puoi creare rapidamente un calendario mensile. Si prega di fare quanto segue:

Clicchi Costruttori > Visual Basic, un nuovo Microsoft Visual Basic per le applicazioni verrà visualizzata la finestra, fare clic su inserire > Moduloe inserisci il codice seguente nel file Modulo:

VBA: crea un calendario mensile in Excel

Sub CalendarMaker ()
ActiveSheet.Protect DrawingObjects: = False, Contents: = False, _
Scenari: = False
Application.ScreenUpdating = False
In caso di errore GoTo MyErrorTrap
Intervallo ("a1: g14"). Cancella
MyInput = InputBox ("Digita mese e anno per il calendario")
If MyInput = "" Allora esci da Sub
StartDay = DateValue (MyInput)
If Day (StartDay) <> 1 Then
StartDay = DateValue (Month (StartDay) & "/ 1 /" & _
Anno (StartDay))
End If
Intervallo ("a1"). NumberFormat = "mmmm yyyy"
Con intervallo ("a1: g1")
.Allineamento orizzontale = xlCenterAcrossSelection
.AllineamentoVerticale = xlCenter
.Dimensione carattere = 18
.Font.Grassetto = Vero
.Altezza Riga = 35
Fine Con
Con intervallo ("a2: g2")
.Larghezza colonna = 11
.AllineamentoVerticale = xlCenter
.HorizontalAlignment = xlCenter
.AllineamentoVerticale = xlCenter
.Orientamento = xlOrizzontale
.Dimensione carattere = 12
.Font.Grassetto = Vero
.Altezza Riga = 20
Fine Con
Range ("a2") = "Sunday"
Intervallo ("b2") = "lunedì"
Intervallo ("c2") = "Martedì"
Intervallo ("d2") = "mercoledì"
Range ("e2") = "giovedì"
Range ("f2") = "Friday"
Intervallo ("g2") = "Sabato"
Con intervallo ("a3: g8")
.HorizontalAlignment = xlRight
.AllineamentoVerticale = xlAlto
.Dimensione carattere = 18
.Font.Grassetto = Vero
.Altezza Riga = 21
Fine Con
Intervallo ("a1"). Valore = Application.Text (MyInput, "mmmm yyyy")
DayofWeek = Giorno della settimana (StartDay)
CurYear = Year (StartDay)
CurMonth = Month (StartDay)
FinalDay = DateSerial (CurYear, CurMonth + 1, 1)
Seleziona Case DayofWeek
Caso 1
Intervallo ("a3"). Valore = 1
Caso 2
Intervallo ("b3"). Valore = 1
Caso 3
Intervallo ("c3"). Valore = 1
Caso 4
Intervallo ("d3"). Valore = 1
Caso 5
Intervallo ("e3"). Valore = 1
Caso 6
Intervallo ("f3"). Valore = 1
Caso 7
Intervallo ("g3"). Valore = 1
End Select
Per ogni cella nell'intervallo ("a3: g8")
RigaCella = cella.Riga
ColCell = cella.Colonna
If cell.Column = 1 And cell.Row = 3 Allora
ElseIf cell.Column <> 1 Allora
If cell.Offset (0, -1) .Value> = 1 Then
cell.Value = cell.Offset (0, -1) .Value + 1
Se cell.Value> (FinalDay - StartDay) Allora
cell.Value = ""
Esci per
End If
End If
ElseIf cell.Row> 3 And cell.Column = 1 Then
cell.Value = cell.Offset (-1, 6) .Value + 1
Se cell.Value> (FinalDay - StartDay) Allora
cell.Value = ""
Esci per
End If
End If
Successiva
Per x = da 0 a 5
Intervallo ("A4"). Offset (x * 2, 0) .EntireRow.Insert
Con intervallo ("A4: G4"). Offset (x * 2, 0)
.Altezza Riga = 65
.HorizontalAlignment = xlCenter
.AllineamentoVerticale = xlAlto
.WrapText = Vero
.Dimensione carattere = 10
.Font.Grassetto = Falso
.Bloccato = Falso
Fine Con
Con intervallo ("A3"). Offset (x * 2, 0). Ridimensiona (2, _
7) .Borders (xlLeft)
.Peso = xlSpesso
. ColorIndex = xl Automatico
Fine Con
Con intervallo ("A3"). Offset (x * 2, 0). Ridimensiona (2, _
7) .Borders (xlRight)
.Peso = xlSpesso
. ColorIndex = xl Automatico
Fine Con
Intervallo ("A3"). Offset (x * 2, 0). Ridimensiona (2, 7) .BorderAround _
Peso: = xlThick, ColorIndex: = xlAutomatic
Successiva
If Range ("A13"). Value = "" Then Range ("A13"). Offset (0, 0) _
.Ridimensiona (2, 8) .EntireRow.Delete
ActiveWindow.DisplayGridlines = Falso
ActiveSheet.Protect DrawingObjects: = True, Contents: = True, _
Scenari: = True
ActiveWindow.WindowState = xlmassimizzato
ActiveWindow.ScrollRow = 1
Application.ScreenUpdating = True
Exit Sub
MyErrorTrap:
MsgBox "Potresti non aver inserito correttamente il mese e l'anno." _
& Chr (13) & "Scrivi correttamente il mese" _
& "(o usa l'abbreviazione di 3 lettere)" _
& Chr (13) & "e 4 cifre per l'anno"
MyInput = InputBox ("Digita mese e anno per il calendario")
If MyInput = "" Allora esci da Sub
CV
End Sub

Quindi fare clic su doc-calendar-2 pulsante per eseguire il codice e verrà visualizzata una finestra di messaggio, è possibile inserire il mese e l'anno nella casella vuota. Vedi screenshot:

doc-crea-calendario2

Quindi fare clic su OK. E un nuovo calendario mensile è stato creato nel foglio di lavoro corrente. Vedi screenshot:

doc-crea-calendario3

Il codice VBA è difficile per la maggior parte di noi e con questo codice VBA puoi creare solo un calendario mensile, se vuoi creare un calendario annuale in modo rapido e semplice, esiste un altro metodo semplice per farlo?


freccia blu freccia destra Crea rapidamente un calendario mensile o annuale con Kutools per Excel

Calendario Perpetuo strumento di kutools per Excel può creare rapidamente un calendario mensile o annuale personalizzato in una nuova cartella di lavoro e ogni calendario mensile sarà contenuto in un nuovo foglio di lavoro.

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Get it Now

Se hai installato Kutools per Excel, fai clic su Impresa > Strumenti del foglio di lavoro > Calendario Perpetuo, E Calendario Perpetuo verrà visualizzata la finestra di dialogo. Se desideri creare un calendario mensile corrente, inserisci 1 nel file Numero di mesi box e clicca Creare pulsante. Vedi screenshot:

doc-crea-calendario4

E poi un calendario mensile corrente è stato generato in una nuova cartella di lavoro.

doc-crea-calendario5

E se vuoi creare un calendario annuale del 2012, inserisci il numero 12 nel file Numero di mesi box e ha specificato il primo mese a Gennaio, 2012 nel riquadro di sinistra. Vedi screenshot:

doc-crea-calendario6

Quindi fare clic su Creare pulsante, creerà il calendario dell'anno 2012 in una nuova cartella di lavoro.

doc-crea-calendario7


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
fondo officetab
Commenti (3)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Lavoro eccellente. Miliardi di grazie per l'ottimo design del modello di calendario di Excel. :lol:
Questo commento è stato fatto dal moderatore sul sito
Ciao, come posso farlo iniziare lunedì invece? Grazie in anticipo
Questo commento è stato fatto dal moderatore sul sito
Grazie ragazzi per l'aiuto. Vorrei poter avere un calendario annuale in cui posso inserire gli elementi. Se puoi aiutare sarebbe fantastico.
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL