Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Excel 2010 Calendario

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel 2010 Calendario

Postdi pacifico » 08/01/16 10:51

Gent.mi,

nuovamente sono a chiedere un suggerimento all'excel 2010.

Prendendo spunto dai vari articoli, in un programma ho realizzato un calendario che
funziona perfettamente e che cliccando sulla data, in una cella del foglio che
precedentemente ho evidenziato, mi appare il giorno, mese ed anno (gg/mm/yyyy).

Gradirei gentilmente un Vostro aiuto:

In un UserForm1, ho inserito un TextBox_Data e gradirei che il gg/mm/aaaa anzichè sulla
cella, sia visibile sulla TextBox_Data.

Gradirei gentilmente sapere se posso inviare il codice per una verifica e relativo ritocco.

Anticipatamente ringrazio.

Domenico.
pacifico
Utente Senior
 
Post: 162
Iscritto il: 05/10/06 16:20

Sponsor
 

Re: Excel 2010 Calendario

Postdi peppo55 » 08/01/16 15:51

Ciao pacifico,

non mi chiaro se il Calendario è posto sul foglio di Excel, oppure è nel Userform.
Presumo che il codice per inserire la data sul foglio sia:
Private Sub Calendar1_Click()
ActiveCell.Value = Calendar1.Value
End Sub

Se il calendario è sul' Userform allora usa questo codice:
Private Sub Calendar1_Click()
TextBox_Data.Value = Calendar1.Value
End Sub

Se il calendario è sul foglio di Excel e vuoi che la data sia inserita nella Textbox dell'Userform usa il codice:
Private Sub Calendar1_Click()
UserForm1.TextBox_Data.Value = Calendar1.Value
End Sub

In questo caso dovrai modificare nelle proprietà dell' Userform , la proprietà ShowModal a False
peppo

Excel 2010
peppo55
Utente Senior
 
Post: 154
Iscritto il: 30/09/12 13:51

Re: Excel 2010 Calendario

Postdi pacifico » 08/01/16 17:08

Gent.mo peppo55,

ringrazio per la gentile attenzione, il calendario assemblato è inserito in UserForm con
il nome di Calendar1, lo stesso dicasi per la TextBox_Data in UserForm1_Data.

Da premettere che in un Modulo di classe con il nome Classe1 è inserito il seguente codice
per far apparire la data sulla cella del foglio che si evidenzia:

Private Sub lbl_Click()

ActiveCell.Value = CDate(lbl.Caption & Calendar1.MeseAnno)

End Sub

Non funziona e non so se ho sbagliato nell'inserire i codici ed indico il procedimento che
ho fatto.

Private Sub Calendar1_Click()

UserForm1_Data.TextBox_Data.Value = Calendar1.Value

End Sub

Nella cella che si evidenzia si nota: giorno, mese ed anno ed ho provato anche:

UserForm1_Data.TextBox_Data.Value = Range("I2").Value

Cordialmente saluto.

Domenico.
pacifico
Utente Senior
 
Post: 162
Iscritto il: 05/10/06 16:20

Re: Excel 2010 Calendario

Postdi pacifico » 08/01/16 19:55

Gent.mo peppo55,

faccio seguito alla precedente che dopo prove, sono riuscito ad ottenere con la seguente formula:

UserForm1.TextBox_Data.Value = Range("G3")
UserForm1.Show

la data estesa per es: "sabato/09/gennaio/2016" e non riesco ad ottenere: 09/01/2016.

Nel ringraziare per l'aiuto, saluto

Domenico.
pacifico
Utente Senior
 
Post: 162
Iscritto il: 05/10/06 16:20


Torna a Applicazioni Office Windows


Topic correlati a "Excel 2010 Calendario":


Chi c’è in linea

Visitano il forum: Nessuno e 12 ospiti