Blocca formato colonne

Versione Completa   Stampa   Cerca   Utenti   Iscriviti     Condividi : FacebookTwitter
Fiore.Michele
00giovedì 30 giugno 2016 23:17
Salve,

io devo fare in modo che in un file xls non avvenga il ridimensionamento delle colonne in fase di copia e incolla o impostazioni filtri.

Non voglio proteggere la cella o bloccarla, devo solo dire ad xls : volgio larghezza colonna ad esempio 15 e deve sempre rimanere tale.

Esiste un modo o forse una piccola macro ???

Helllllpppppp [SM=x423023] [SM=x423023] [SM=x423023]
Konki66
00venerdì 1 luglio 2016 09:20
Ciao Michele
se fai un "proteggi foglio", puoi lasciare libere tutte le operazioni tranne il formato colonne.
Clicca sulla linguetta del nome del foglio con il pulsante destro del mouse e scegli la voce proteggi foglio. Nella parte bassa del box che ti si apre flagga tutte le operazioni che vuoi consentire, e non flaggare formato colonne

Marco
Fiore.Michele
00venerdì 1 luglio 2016 09:50
Ciao Marco,

grazie per la risposta ma non funziona ero già arrivato anche io.Non devo proteggere il foglio devo solo bloccare la larghezza delle colonne.

Prova anche tu se poi metti i filtri o copie e incolli non puoi fare più niente come dici tu.

Io devo bloccare un formato ovvero il contenuto

Es. ho una cella con scritto 1.000.000, se imposto poi dei filtri non si legge più nulla... spero di aver reso l'idea

[SM=x423024] [SM=x423024]
dodo47
00venerdì 1 luglio 2016 10:40
Ciao
la seguente istruzione:
Columns("A:E").ColumnWidth = 10 impone larghezza 10 alle colonne da A a E.

Ciò premesso, vedi tu qual è l'evento (o più eventi) del foglio che più si adatta alla tua necessità.

Potrebbe essere SelectionChange, Change, Calculate, Activate, dipende da quale tipo di interventi fai sul tuo documento.

Prova con il SelectionChange come primo tentativo.

saluti
Fiore.Michele
00venerdì 1 luglio 2016 12:06
Grazie Domenico,

ti giro un file di prova con dati inventati per farti capire.

Non sapendo da dove partire con le macro si potrebbe inserire la tua macro in questo file che poi io trasporto sul file originale o viceversa trasporto i dati sul file con la macro cambiando solo i parametri delle celle?

Grazie 10000000 siamo vicini...

[SM=x423069] [SM=x423069] [SM=x423069]

dodo47
00venerdì 1 luglio 2016 13:34
Ciao
facciamo prima a adattare la larghezza di tutte le colonne.
Per la macro:

ALT-F11 si apre la finestra del vba
sulla sinistra fai doppio click sul tuo foglio di lavoro (nell'esempio che hai inviato Foglio1 (Foglio1)
nella finestra che si apre sulla destra, incolla il seguente codice:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Columns.AutoFit
End Sub

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
    Columns.AutoFit
End Sub


Ti allego comunque l'esempio, ma come vedi è abbastanza semplice farlo.

Dopo aver cliccato sulla scelta A-B-C ecc ecc, le colonne si adatteranno, così come su una cella qualsiasi del foglio.

saluti

EDIT: non riesco ad eliminare questo allegato: usa quello del post successivo.
dodo47
00venerdì 1 luglio 2016 13:47
Dimenticavo l'allegato. Leggi bene quanto su esposto.

saluti
Fiore.Michele
00venerdì 1 luglio 2016 16:12
Grazie Domenicoooooo era proprio quello che cercavo !!!

6 un GRANDE [SM=x423017] [SM=x423017]

Ti chiedo un ultima cosa che volevo automatizzare.

Nel file che ti allego vorrei aggiungere un pulsante "refresh" che deve collegarsi al tasto aggiorna PIVOT.

E' per non farlo manualmente ma attraverso un pulsante, nel caso il file lo debba usare un'altra persona quando io non ci sono.

Credi sia possibile istallare un collegamento che quando aggiorno i dati nella tabella clicco e mi si aggiorna il data base?
Fiore.Michele
00venerdì 1 luglio 2016 16:14
Grazie Domenicoooooo era proprio quello che cercavo !!!

6 un GRANDE [SM=x423017] [SM=x423017]

Ti chiedo un ultima cosa che volevo automatizzare.

Nel file che ti allego vorrei aggiungere un pulsante "refresh" che deve collegarsi al tasto aggiorna PIVOT.

E' per non farlo manualmente ma attraverso un pulsante, nel caso il file lo debba usare un'altra persona quando io non ci sono.

Credi sia possibile istallare un collegamento che quando aggiorno i dati nella tabella clicco e mi si aggiorna il data base?
dodo47
00venerdì 1 luglio 2016 16:17
Ciao
in un modulo:

sub refrPivot()
ActiveSheet.PivotTables("Tabella_pivot1").PivotCache.Refresh
End Sub

e leghi la macro ad un pulsante

saluti
Fiore.Michele
00venerdì 1 luglio 2016 18:34
Grazie Domenico funziona perfettamente !!!

[SM=x423030] [SM=x423030] [SM=x423030]
Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 03:51.
Copyright © 2000-2024 FFZ srl - www.freeforumzone.com