Condividi:        

Visualizzare iniziale mese in maiuscolo e anno

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

Visualizzare iniziale mese in maiuscolo e anno

Postdi alby60 » 25/01/11 01:21

Ciao, ho uno nuovo quesito: in una cella scrivo una data 01-02-2011, vorrei visualizzare Febbraio 2011 - Febbraio con la F maiuscola - come posso fare. Ho utilizzato il formato mmmm aaaa ma la effe di febbraio è minuscola. Grazie anticipato
alby60
Utente Junior
 
Post: 76
Iscritto il: 18/11/10 01:04

Sponsor
 

Re: Visualizzare iniziale mese in maiuscolo e anno

Postdi Flash30005 » 25/01/11 03:17

Sembra che del giorno non te ne importi molto

al momento e vista l'ora sono riuscito a fare questa macro che riporta nella colonna B quanto da te richiesto (eventualmente adatta le colonne secondo la tua esigenza ma attenderei eventuali altre soluzioni)

Codice: Seleziona tutto
Sub MesiInMaiuscolo2()
UR = Worksheets("foglio1").Range("A" & Rows.Count).End(xlUp).Row
Dim Vmese(12) As String
Vmese(1) = "Gennaio"
Vmese(2) = "Febbraio"
Vmese(3) = "Marzo"
Vmese(4) = "Aprile"
Vmese(5) = "Maggio"
Vmese(6) = "Giugno"
Vmese(7) = "Luglio"
Vmese(8) = "Agosto"
Vmese(9) = "Settembre"
Vmese(10) = "Ottobre"
Vmese(11) = "Novembre"
Vmese(12) = "Dicembre"
For RR = 2 To UR
    Mese = Vmese(Val(Mid(Range("A" & RR).Value, 4, 2)))
    Range("B" & RR).Value = Mese & " " & Year(Range("A" & RR).Value)
Next RR
End Sub


ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Visualizzare iniziale mese in maiuscolo e anno

Postdi Anthony47 » 26/01/11 00:36

Solo per curiosita', se setti (Pannello di controllo, Opzioni internazionali, tab Opzioni internazionali) l' impostazione English Us avrai le iniziali maiuscole. Ci sono "effetti collaterali anche gravi", che puoi ridurre tramite il tasto personalizza...

Hai gia' avuto il suggerimento di usare la formula =Maiusc.Iniz(testo(LaData;"mmmm-aaaa")), nel caso che Mese-anno lo possa visualizzare in una cella diversa da quella che contiene la data.

Una ulteriore alternativa, se ad esempio le date sono "digitate" in col A, e' una macro del tipo
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Value <> "" Then
    Application.EnableEvents = False
    Target.Value = Application.WorksheetFunction.Proper(Format(Target.Value, "mmmm-yyyy"))
End If
Application.EnableEvents = True
End Sub

Mi sembri abbastanza esperto, sai che va messa nel "modulo di FoglioN"; l' effetto collaterale e' che la cella perde il suo contenuto Data, che ovviamente va valutato.

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Visualizzare iniziale mese in maiuscolo e anno

Postdi alby60 » 27/01/11 23:31

Ciao, non ho avuto modo di accedere fino ad adesso e non avevo letto le vostre risposte. Grazie. Funzionano ma avrei preferito non dover utilizzare una cella apposita o una macro.
alby60
Utente Junior
 
Post: 76
Iscritto il: 18/11/10 01:04


Torna a Applicazioni Office Windows


Topic correlati a "Visualizzare iniziale mese in maiuscolo e anno":


Chi c’è in linea

Visitano il forum: Nessuno e 99 ospiti