Come creare un calendarietto in Excel

[vecchio fracSenior Moderator vecchio frac Karma: 272 pts]

Prendendo spunto dall'esigenza di uno dei nostri utenti del forum, ecco una soluzione semplice e carina per realizzare una vista mensile di un calendario, posizionabile poi a piacere nel foglio e ulteriormente formattabile, non fa uso di formule nè di formattazioni condizionali, tiene conto dei sabati e delle domeniche colorandole di rosso.

[Leggi tutto al seguente link: https://www.excelvba.it/forumexcel/come-creare-un-calendarietto-in-excel/]

[Marius44Moderatore Marius44 Karma: 58 pts]

Ciao V.F.

Complimenti per l'ottimo lavoro     

 

Un'altra opportunità potrebbe essere quella di sfruttare l'Evento Worksheet_Change della cella B1 del Foglio (evitando così il pulsante e l'InputBox)

Ciao,

Mario

[vecchio fracSenior Moderator vecchio frac Karma: 272 pts]

Yessa, infatti mi son divertito a espandere un pochino la proposta altrimenti era scialba 😀

Il cuore del carciofo, pardon del codice è solo la routine del modulo crea_calendar che potrebbe anche stare da sola, senza parametri, prendendo la data da una cella qualsiasi.

Massima personalizzazione, ed è lo scopo di questi articoli... fornire lo spunto   

[Luca73Partecipante Luca73 Karma: 58 pts]

Aggiungerei il seguente pezzettino se interessa evidenziare il giorno corrente

Private Sub Workbook_Open()
Dim CellaW As Range
With Sheets(1)
.Range(.Range("A4"), .Range("A4").End(xlToRight).End(xlDown)).Interior.Pattern = xlNone
    If Date >= .Range("A4") And Now <= .Range("A4").End(xlToRight).End(xlDown) Then
        For Each CellaW In .Range(.Range("A4"), .Range("A4").End(xlToRight).End(xlDown))
            If CDate(CellaW) = Date Then
                CellaW.Interior.Color = 5296274
                Exit For
            End If
        Next
    End If
End With
End Sub

[DeletedUserBloccato DeletedUser Karma: 13 pts]

si ma arriva a febbraio mica a dicembre

[vecchio fracSenior Moderator vecchio frac Karma: 272 pts]

Sì, infatti è un calendario mensile. Nel senso che mostra un mese, quello inserito nella cella gialla.
Con la particolarità che mostra in grigio i giorni che non appartengono al mese scelto (perchè il calendario mostra la settimana dal lunedì alla domenica, e può darsi che il mese scelto non inizi di lunedì e non finisca di domenica), e mostra in rosso i giorni del fine settimana.

Tutto personalizzabile e modificabile a piacere 🙂

[DeletedUserBloccato DeletedUser Karma: 13 pts]

no no le macro non fanno per me tutto quel papiro con stringhe improponibli, per carità

[DeletedUserBloccato DeletedUser Karma: 13 pts]

Se volete un calendario che vi fa vedere solo il mese corrente, ve lo passo volentieri.  Non si tratta di un mio progetto. Eccolo in allegato, senza nulla togliere al calendario del GRANDE  vecchio frac

Allegati:

You must be logged in to view attached files.

[GiuseppeMNPartecipante GiuseppeMN Karma: 19 pts]

Buona sera a Tutti.
Per ringraziare @vecchio frac e @luca73 è pronta una birra fatta in casa; ha un retrogusto di liquirizia (Glycyrrhizza Glabra), per questo da un Chef mio Amico è stata definita "Birra da meditazione!"    

Per la proposta di @M.Paolo sinceramente non non sono riuscito ad apprezzare il Foglio di lavoro protetto da password; Excel non ha delle protezioni eccellenti quindi, appena avrò 10 (dieci) minuti di tempo, sarà mia premura sproteggerlo e condividerlo in Forum.

Giuseppe 

 

[GiuseppeMNPartecipante GiuseppeMN Karma: 19 pts]

Scusate il ritardo, ma ho dovuto rispondere al telefono.
Non è certo mia abitudine sproteggere un File EXCEL ma, a beneficio di chi può essere interessato, come promesso, allego il File sprotetto con buona pace di @M.Paolo.

Buon fine settimana a Tutti.

Giuseppe

Allegati:

You must be logged in to view attached files.

[vecchio fracSenior Moderator vecchio frac Karma: 272 pts]

GiuseppeMN ha scritto:

è pronta una birra fatta in casa; ha un retrogusto di liquirizia

Dimmi dove       

M.Paolo ha scritto:

Eccolo in allegato, senza nulla togliere al calendario del GRANDE  vecchio frac

Grazie ma io di grande ho solo due cose: l'età e la formula di Excel   

GiuseppeMN ha scritto:

Scusate il ritardo, ma ho dovuto rispondere al telefono

Ci hai messo davvero troppo... era solo una protezione di foglio e non c'era nemmeno una riga di codice   

[GiuseppeMNPartecipante GiuseppeMN Karma: 19 pts]

Dimmi dove

Per una birra non credo valga la pena fare tanta strada; però se aggiungiamo anche uno spiedo bresciano/bergamasco possiamo organizzare, magari assieme a qualche altro Amico.

Che non ci fosse VBA lo si capiva dall'estensione .xlsx .

 

Giuseppe

[Autore]

Articoli