Excel - Pulire un foglio excel

Asked By mkd on 22-May-12 03:58 AM
Buongiorno.
Sto facendo una macro VBA e vorrei eliminare, da codice, il contenuto
delle celle (colore interno, testo/numero interno...niente di
particolare). Lo devo per=F2 fare SU TUTTO IL FOGLIO. Deve essere
pulito, intonso.
C'=E8 un modo, con una riga di codice, o con qualche riga semplice di
codice, per fare cio'?
Non so, una cosa tipo:

worksheet.clear.contents.all   '??  :))

N.B.: ribadisco che devo cancellare anche eventuali colori di sfondo
di alcune celle (no fill!)
Inoltre nel codice preferirei lavorare con un certo stile, non da
fabbro...tipo l'orrendo indicare un range specifico (p.e.
A1...AA1000!!), ma semplicemente pulire TUTTO il foglio excel.

Grazie


pfmarro replied to mkd on 22-May-12 05:18 AM
Il giorno marted=EC 22 maggio 2012 09:58:21 UTC+2, mkd ha scritto:

prova a crearti una macro
1- selezioni tutto (click su cella in alto a sx)
2- modifica cancella tutto

ottieni
Cells.Select
Selection.Clear
Mauro Gamberini replied to mkd on 22-May-12 06:53 AM
Se per pulire intendi eliminare anche eventuali
formattazioni di celle e colonne tipo la larghezza,
l'altezza, ecc. vedi questo codice per il foglio
attivo:

Public Sub m_5()
Dim sNome As String
Dim sCodeName As String
Dim sh As Worksheet
Set sh = ActiveSheet
With sh
sNome = .Name
sCodeName = .[_CodeName]
Application.DisplayAlerts = False
sh.Delete
Application.DisplayAlerts = False
End With
ThisWorkbook.Worksheets.Add
Set sh = ActiveSheet
With sh
.Name = sNome
.[_CodeName] = sCodeName
End With
Set sh = Nothing
End Sub

In pratica creo un nuovo foglio che lo stesso nome
e CodeName del vecchio.


--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
Buongiorno.
Sto facendo una macro VBA e vorrei eliminare, da codice, il contenuto
delle celle (colore interno, testo/numero interno...niente di
particolare). Lo devo però fare SU TUTTO IL FOGLIO. Deve essere
pulito, intonso.
C'è un modo, con una riga di codice, o con qualche riga semplice di
codice, per fare cio'?
Non so, una cosa tipo:

worksheet.clear.contents.all   '??  :))

N.B.: ribadisco che devo cancellare anche eventuali colori di sfondo
di alcune celle (no fill!)
Inoltre nel codice preferirei lavorare con un certo stile, non da
fabbro...tipo l'orrendo indicare un range specifico (p.e.
A1...AA1000!!), ma semplicemente pulire TUTTO il foglio excel.

Grazie
Bruno Campanini replied to pfmarro on 23-May-12 07:58 PM
It happens that pfmarro formulated :


I tecnici della MS sanno costruire i linguaggi, poi non li san
programmare:

Cells.Clear

That's enough!

Bruno
Mauro Gamberini replied to Bruno Campanini on 23-May-12 08:38 PM
Non sapevo che pfmarro fosse *un tecnico Microsoft*.

--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
Bruno Campanini replied to Mauro Gamberini on 23-May-12 09:38 PM
Mauro Gamberini used his keyboard to write :

Lui no, ma quelli che hanno insegnato a mezzo mondo che prima di fare
alcunch? occorre selezionare il range, s?: a quelli mi riferivo.

Ciao, come va lo sciame? lo stai ancora avvertendo?
Bruno
Scossa replied to Mauro Gamberini on 23-May-12 08:40 AM
On 22 Mag, 12:53, "Mauro Gamberini"

Ciao Mauro,

mi sfugge il vantaggio nell'usare:

sCodeName =3D .[_CodeName]

anzich=E9

sCodeName =3D .CodeName

La notazione [] mi fa pensare pi=F9 ad un Name
(tipo[_FilterDatabase])che alla propriet=E0 .Codename.

C'=E8 qualche differenza sostanziale tra le due notazioni?
Ammammata replied to mkd on 24-May-12 05:45 AM
Il giorno Tue 22 May 2012 09:58:21a, *mkd* inviava su
483c2d40363a@l5g2000vbo.googlegroups.com. Vediamo cosa scrisse:


non si fa prima a eliminarlo e a crearne uno nuovo?


--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........
Mauro Gamberini replied to Bruno Campanini on 24-May-12 01:48 PM
Ieri sera un bang! da 4.3 alle 23.41 circa ora di andare a letto...
...ecco spiegato il motivo della mail a tarda notte (poi chi dorme più).

Tanto per spiegare cosa ti resta dentro, un episodio di oggi pomeriggio.
Ero in un capannone per sistemare 3 pc. Un addeddo ha chiuso un portone
facendo un bel botto. Sono (ehmmm, siamo) scappati tutti fuori pensando
ad un'altra scossa. Poi l'abbiamo messa giù in ridere, ma dentro senti
il cuore che batte e pensi: speriamo che questa notte stia
buono e di riuscire a dormire.

Io resto in casa di notte, ma tanti la passano in auto o dove possono.
La mattina rientrano, un caffè in fretta e poi al lavoro.

E i posti che ho visto da una vita, i paesi qui vicino....
...oh, giuro che fa male, è la mia gente per Dio!

Qui si è sempre pensato che se proprio qualcosa
doveva accadere, era Reno che rompeva gli argini.
Questo *traballamento*, no.
Ma passerà, passa tutto.
Siamo brava gente noi, ci vuole altro che un terremoto.

Grazie per il pensiero.
Buona serata.

--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
Mauro Gamberini replied to Scossa on 24-May-12 01:53 PM
Ciao Scossa (di che magnitudo?)

Non lo so.
Ho *eridatato* quel codice da Roberto Restelli
tanto tempo fa e l'ho sempre utilizzato così.

Appena ho un attimo di tempo mi informo.

(chiedo scuda se non quoto, ma ho problemi)

--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
On 22 Mag, 12:53, "Mauro Gamberini"

Ciao Mauro,

mi sfugge il vantaggio nell'usare:

sCodeName = .[_CodeName]

anziché

sCodeName = .CodeName

La notazione [] mi fa pensare più ad un Name
(tipo[_FilterDatabase])che alla proprietà .Codename.

C'è qualche differenza sostanziale tra le due notazioni?
Mauro Gamberini replied to Ammammata on 24-May-12 01:54 PM
Il (Name) non sarà quello del foglio eliminato.

--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
Scossa replied to Mauro Gamberini on 24-May-12 02:47 PM
In article <jplsjl$hgq$1@dont-email.me>,=20
maurogscRIMUOVERE@RIMUOVEREaliceposta.it says...

Eh, l'ho sentita bene io che sto sulle colline veronsi (tra Verona e Soave)=
=20
posso solo provare a immaginare quello che hai vissuto tu :-(


Grazie, e auguri!!=20

--=20
Bye!
Scossa