Excel VBA
Nuova Versione del Programma, per Realizzare un Report.
Adesso non cancella tutta la pagina ma solo le Colonne A e B.
Private Sub Worksheet_Activate()
Dim ScorriRigheDati As Integer ' Contatore Utilizzato per Scorrere le Dati in Dati
Dim ScorriRigheStat4 As Integer ' Contatore Utilizzato per Contare le Città
' '''''''''''''''''''''
' Pulisco Completamente il Foglio "Stat4" nelle Colonne A e B
' '''''''''''''''''''''
Columns("A:B").Select
Selection.ClearContents
' '''''''''''''''''''''
' '''''''''''''''''''''
' Scrivo L' Intestazione di Colonna
' '''''''''''''''''''''
Worksheets("Stat4").Cells(1, 1) = "Sede"
Worksheets("Stat4").Cells(1, 2) = "Istanze"
' '''''''''''''''''''''
' '''''''''''''''''''''
' Aggiorno i Contatori e Copio i dati da "Dati"
' '''''''''''''''''''''
ScorriRigheDati...
Leggi il seguito »
Adesso non cancella tutta la pagina ma solo le Colonne A e B.
Private Sub Worksheet_Activate()
Dim ScorriRigheDati As Integer ' Contatore Utilizzato per Scorrere le Dati in Dati
Dim ScorriRigheStat4 As Integer ' Contatore Utilizzato per Contare le Città
' '''''''''''''''''''''
' Pulisco Completamente il Foglio "Stat4" nelle Colonne A e B
' '''''''''''''''''''''
Columns("A:B").Select
Selection.ClearContents
' '''''''''''''''''''''
' '''''''''''''''''''''
' Scrivo L' Intestazione di Colonna
' '''''''''''''''''''''
Worksheets("Stat4").Cells(1, 1) = "Sede"
Worksheets("Stat4").Cells(1, 2) = "Istanze"
' '''''''''''''''''''''
' '''''''''''''''''''''
' Aggiorno i Contatori e Copio i dati da "Dati"
' '''''''''''''''''''''
ScorriRigheDati...
Leggi il seguito »
Invia questo articolo via email
LEGGI LE ALTRE NOTIZIE DE "IL BLOGGATORE"










