Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it
    Registrato dal
    Dec 2008
    Messaggi
    358

    excell 03- Cancellare dati in righe con VBA

    Per semplificare:
    Colonne A e B, righe impegnate 10
    In colonna A da riga 1 a 10 contiene i numeri progressivi da 1 a 10
    In colonna B le prime 6 celle contengono un asterisco (*)

    Nella relatà i campi B compilati con gli sterischi sono variabili, possono essere tutti vuoti , parzialmente o tutti compilati.
    Essendo stati ordinati con chiave B le righe con gli asterischi sono nella parte superiore.

    Si vuole generare un codice che elimini i contenuti delle righe (non le stesse righe) dove il campo B è vuoto.

    Nell'esempio sopra riporato verranno eliminati i contenuti delle righe da 7 a 10.

    Grazie

  2. #2
    Utente di HTML.it L'avatar di nicola75ss
    Registrato dal
    Nov 2004
    Messaggi
    12,923
    Non sono sicurissimo di aver capito ma non basterebbe una formula del genere

    =SE(SINISTRA(B1;6)="******";B1;"")

    in questo modo se i primi 6 caratteri della cella sono asterischi lasci il contenuto invariato. in caso contrario assegni alla cella una stringa vuota.

  3. #3
    Utente di HTML.it
    Registrato dal
    Dec 2008
    Messaggi
    358

    Serve VBA

    Forse ho esposto in modo non chiaro, riformulo:

    nell'intervallo A1:B10
    Se la cella B e vuota:
    devo cancellare il contenuto nel range A7:B10
    (in pratica dove B è vuoto)
    Immagini allegate Immagini allegate

  4. #4
    Utente di HTML.it L'avatar di nicola75ss
    Registrato dal
    Nov 2004
    Messaggi
    12,923
    Seleziona l'intervallo di celle della colonna B e prova a eseguire questa macro

    codice:
    Sub cancella()
    For Each cella In Selection.Cells
      If cella.Value = "" Then
         Rows(cella.Row).Select
         Selection.ClearContents
      End If
    Next
    End Sub

  5. #5
    Utente di HTML.it
    Registrato dal
    Dec 2008
    Messaggi
    358
    Come al solito perfetto,
    Spolverando il pc ho trovato:
    range (A1:B10)
    e l'ho aggiunto dopo la prima riga.

    Nicola75ss, Grazie infinite

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.