Question : Macro pour dégager toutes les rangées au-dessous de la dernière cellule des données

Le macro que j'essaye d'écrire fera défiler à la rangée au-dessous de la dernière cellule avec des données dans la colonne B, et puis clair toutes les rangées de ce point vers le bas au fond. le

par exemple, si la dernière valeur est dans la rangée 15, il dégagera tout le contenu dans toutes les colonnes de la rangée 16 à la dernière rangée dans le spreadsheet.

Thanks ! class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de 
1 :
2 :
3 :
4 :
5 :
6 :
7 :
>Sheets " de l'id= " codeSnippet833788 de
class= de

Réponse : Macro pour dégager toutes les rangées au-dessous de la dernière cellule des données

Ce code tuera les rangées rapidement sans bouclage

À la votre

Dave
1 :
2 :
3 :
4 :
5 :
6 :
7 :

Mise à mort secondaire ()
    Faible rng1 comme gamme
    Feuilles (« réalité composée »). Choisi
    Placer rng1 = cellules (Rows.Count, « B »). Extrémité (xlUp). Excentrage (1, 0)
    Placer rng1 = gamme (rng1, rng1.End (le xlDown))
    rng1.EntireRow.ClearContents
Finissent le sous-marin
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
    •
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
    •
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
    •
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
    •
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
    •
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
    •
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
    •
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
    •
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
    •
  •  Winzip 12 issues de secours du travail ?
    •
     
    programming4us programming4us