Vba dernière cellule d'une ligne pleine

Fermé

serial-killer Messages postés 20 Date d'inscription mardi 21 août 2007 Statut Membre Dernière intervention 22 mai 2009 - 13 mai 2009 à 18:50
timeisrunningout - 1 mars 2010 à 16:17

Bonjour,

je travail en ce moment sur un fichier excel où j'importe des données et je me suis bloqué sur des fonctions qui me permettent de détecter:
1- la dernière cellule remplie de la ligne par exemple ("A1:M1")
2-la zone replie c.à.d ligne et colonne par exemple ("A1:Z200")
afin qu'elle soient sélectionner et qu'elle subissent des transformations merci de m'aider

mon début de code et:
ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
Selection.Delete Shift:=xlUp
( ActiveCell.Offset(-1, 0).Range("A1:M1").Select) là où j'ai le problème au lieu de la plage ("A1:M1") je veu que la cellule "M1" soit détecter automatiquement

et la meme chose pour
ActiveCell.Range("A1:M251").Select je veu que la cellule "M251" soit détecter automatiquement

merci d'avance

A voir également:

Vba offset range selection
Outil selection illustrator ne fonctionne pas ✓ - Forum Illustrator
Erreur 1004 vba ✓ - Forum VB / VBA
Inverser selection excel - Forum Excel
L'indice n'appartient pas à la sélection vba ✓ - Forum VB / VBA
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
17 mai 2009 à 08:53

bonjour

ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
Selection.Delete Shift:=xlUp

Ton code est assez fantaisiste et mélange un peu tout
Rows(1).delete
doit faire la même chose.

( ActiveCell.Offset(-1, 0).Range("A1:M1").Select) là où j'ai le problème au lieu de la plage ("A1:M1") je veu que la cellule "M1" soit détecter automatiquement

Range("A1").Resize(1, Cells(1,1).SpecialCells(xlCellTypeLastCell).Column).Select

ActiveCell.Range("A1:M251").Select

Range("A1").Resize(Cells.SpecialCells(xlCellTypeLastCell).Row, Cells.SpecialCells(xlCellTypeLastCell).Column).Select

timeisrunningout
1 mars 2010 à 16:17

Merci bcp !
Ca m'a été très utile à moi...

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

input signal out of range

erreur d'execution 9, l'indice n'appartient pas à la sélection

Probleme de Range erreur 1004 !!! VB Excel

Discussions similaires

Newsletters