Bonjour,
j'ai une feuille excel dont je ne connai pas sa longueur.
Comment faire pour savoir quelle est la derniere colonne
ecrite.
Ex si ma derniere colonne est a200 qu'il me le dise
les données peuvent être du texte ou des chiffre en aucun cas
une cellule vide
Merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour arkangel,
On Error Resume Next 'Dernière colonne de la feuille2 DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByColumns, _ SearchDirection:=xlPrevious).Column On Error GoTo 0 'Dernière ligne de la feuille2 DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row On Error GoTo 0
Salutations!
"arkangel" a écrit dans le message de news: Bonjour, j'ai une feuille excel dont je ne connai pas sa longueur. Comment faire pour savoir quelle est la derniere colonne ecrite. Ex si ma derniere colonne est a200 qu'il me le dise les données peuvent être du texte ou des chiffre en aucun cas une cellule vide Merci
Bonjour arkangel,
On Error Resume Next
'Dernière colonne de la feuille2
DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _
LookIn:=xlFormulas, SearchOrder:=xlByColumns, _
SearchDirection:=xlPrevious).Column
On Error GoTo 0
'Dernière ligne de la feuille2
DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _
LookIn:=xlFormulas, SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
On Error GoTo 0
Salutations!
"arkangel" <vincent.robin6@free.fr> a écrit dans le message de
news:XnF95149CA468897vincentrobin6freefr@193.252.19.141...
Bonjour,
j'ai une feuille excel dont je ne connai pas sa longueur.
Comment faire pour savoir quelle est la derniere colonne
ecrite.
Ex si ma derniere colonne est a200 qu'il me le dise
les données peuvent être du texte ou des chiffre en aucun cas
une cellule vide
Merci
On Error Resume Next 'Dernière colonne de la feuille2 DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByColumns, _ SearchDirection:=xlPrevious).Column On Error GoTo 0 'Dernière ligne de la feuille2 DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row On Error GoTo 0
Salutations!
"arkangel" a écrit dans le message de news: Bonjour, j'ai une feuille excel dont je ne connai pas sa longueur. Comment faire pour savoir quelle est la derniere colonne ecrite. Ex si ma derniere colonne est a200 qu'il me le dise les données peuvent être du texte ou des chiffre en aucun cas une cellule vide Merci
arkangel
"michdenis" écrivait news:: Salut Michdenis Merci c'est ce que chercher
Bonjour arkangel,
On Error Resume Next 'Dernière colonne de la feuille2 DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByColumns, _ SearchDirection:=xlPrevious).Column On Error GoTo 0 'Dernière ligne de la feuille2 DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row On Error GoTo 0
Salutations!
"arkangel" a écrit dans le message de
news: Bonjour, j'ai une feuille excel dont je ne connai pas sa longueur. Comment faire pour savoir quelle est la derniere colonne ecrite. Ex si ma derniere colonne est a200 qu'il me le dise les données peuvent être du texte ou des chiffre en aucun cas
une cellule vide Merci
"michdenis" <michdenis@hotmail.com> écrivait
news:OT76PN4WEHA.1152@TK2MSFTNGP09.phx.gbl:
Salut Michdenis
Merci c'est ce que chercher
Bonjour arkangel,
On Error Resume Next
'Dernière colonne de la feuille2
DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _
LookIn:=xlFormulas, SearchOrder:=xlByColumns, _
SearchDirection:=xlPrevious).Column
On Error GoTo 0
'Dernière ligne de la feuille2
DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _
LookIn:=xlFormulas, SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
On Error GoTo 0
Salutations!
"arkangel" <vincent.robin6@free.fr> a écrit dans le message
de
news:XnF95149CA468897vincentrobin6freefr@193.252.19.141...
Bonjour,
j'ai une feuille excel dont je ne connai pas sa longueur.
Comment faire pour savoir quelle est la derniere colonne
ecrite.
Ex si ma derniere colonne est a200 qu'il me le dise
les données peuvent être du texte ou des chiffre en aucun
cas
"michdenis" écrivait news:: Salut Michdenis Merci c'est ce que chercher
Bonjour arkangel,
On Error Resume Next 'Dernière colonne de la feuille2 DerCol = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByColumns, _ SearchDirection:=xlPrevious).Column On Error GoTo 0 'Dernière ligne de la feuille2 DerLig = Worksheets("Feuil2").UsedRange.Find(What:="*", _ LookIn:=xlFormulas, SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row On Error GoTo 0
Salutations!
"arkangel" a écrit dans le message de
news: Bonjour, j'ai une feuille excel dont je ne connai pas sa longueur. Comment faire pour savoir quelle est la derniere colonne ecrite. Ex si ma derniere colonne est a200 qu'il me le dise les données peuvent être du texte ou des chiffre en aucun cas