[Excel] Ingrandire alcune aree del foglio

[cesare71]

Ciao nel proseguo del mio file Excel volevo sapere se si poteva in un range di celle formattate per data con ora richiamare in qualche modo una maschera che ingrandisse la cella per una migliore digitazione.
Forse con un inputbox????
Ciao a tutti
grazie ancora per l'aiuto dato nel precedente quesito

[Anthony47]

Prova con questa macro:

Codice: Seleziona tutto

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
CheckArea = "B5:C10"   '<<< l' area che sara' ingrandita
If Application.Intersect(Target, Range(CheckArea)) Is Nothing Or Target.Count > 1 Then
    ActiveWindow.Zoom = 100
Else
    ActiveWindow.Zoom = 200
End If
End Sub


Tasto dx sul tab col nome del foglio su cui vuoi fare l' operazione, scegli Visualizza codice, copia il codice e incollalo nel frame di dx.
Personalizza l' istruzione marcata <<<

Ciao, fai sapere.

[cesare71]

Ciao si funziona .......ma ti volevo segnalare del timer con msgbox ha dei problemi......quando attivo la macro non riesco più ad uscire dal file...devo interromperla da VB non c'è un modo da dentro il file che mi arresta la macro per poter uscire .....grazie tante ancora per le tue opere di vb...ciao

[Anthony47]

Per il timer e i msgbox ho risposto nella discussione originale; vedi viewtopic.php?f=26&t=94739&p=542600#p542600

Ciao