Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

colonnes: repérer la dernière cellule avec une police Code 128

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
C

CAPRI_456

XLDnaute Occasionnel
Bonjour le Forum,
Voici un petit fichier en annexe avec en feuil 1 un code "Printbutton"
Dans les colonnes C , H et L , je souhaiterai identifier dans les variables suivantes:

nbLignesT1
nbLignesDECL
nbLignesEX

la dernière ligne qui comprend une police "Code 128" (soit un barre Code") mais cela pourrait être


J'arrive toujours à la ligne 59. (en travaillant sur la dernière ligne non vide)

Une fois mes variables alimentées, je récupère la valeur de la plus grande (code sur le forum, mais je ne sais plus de qui): cette récupération fonctionne , mais au lieu de la ligne 59 , je souhaiterai récupérer la dernière ligne avec un barre code


Merci pour votre aide.

CAPRI_456
 

Pièces jointes

Trier par date Trier par votes
Re : colonnes: repérer la dernière cellule avec une police Code 128

J'oubliais de dire

le but de cela est en identifiant la dernière ligne reprenant un code barre, de sélectionner uniquement la plage, pour n'imprimer que ma selection et non des feuilles avec des cases vides.

Merci

CAPRI_456
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

la dernière ligne qui comprend une police "Code 128" (soit un barre Code")
Cliquez pour agrandir...

Bonjour le Forum,
peut être aurai-je du spécifier que dans la dernière cellule:
-- il pourrait s'agir de n'importe quelle police
-- ou encore de texte

-- ou encore qu'il s'agit tout simplement d'identifier la dernière ligne non vide (donc utilisée) afin d'éviter d'imprimer au-delà (sachant que j'ai des formules jusque en ligne 59.

Bien à vous
et merci si vous pouviez m'apporter un début d'aide par rapport à mes essais de code


CAPRI_456
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

Bonjour à tous

- ou encore qu'il s'agit tout simplement d'identifier la dernière ligne non vide (donc utilisée) afin d'éviter d'imprimer au-delà (sachant que j'ai des formules jusque en ligne 59.
Cliquez pour agrandir...

Et t'as pas trouvé d'exemples dans les archives du forum ????
Parce que les "Dim derlig As Long" et tout ce qui s'ensuit s'y ramassent à la pelle 😉
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

Bonjour le Forum, Staple 1600

Et t'as pas trouvé d'exemples dans les archives du forum ????
Cliquez pour agrandir...

Si, si, j'ai fouiné,et enfin dans mon code j'ai testé ceci



Alors que je devrai avoir "40" pour la col C

est ce du au fait qu'il y existe des cellules vides dans la colonne ou des formules ?.?

Je ne vois pas.


Merci
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

Bonjour


Essaies de voir ce que tu peux piocher dans ce qui suit dessous
Code: 
Sub a()
Dim dercol&, derlig&
derlig = Cells(65536, "C").End(xlUp).Row
dercol = Cells(derlig, "IV").End(xlToLeft).Column
MsgBox Cells(derlig, dercol).Address
End Sub
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

Re

C'est normal puisque que tu as des cellules en colonne C certes vides qui ont un format et des bordures.
(Donc le L58 est tout à fait logique en l'état)

Il va falloir ruser, mais ce sera pour plus tard, je retourne bosser pour le moment.

D'autres ici sauront bien t'aiguiller 😉
 
Vote positif 0 Vote négatif
Re : colonnes: repérer la dernière cellule avec une police Code 128

Bonjour,

un exemple de recherche sur la colonne A :
Code: 
Dim y As Long
y = Columns(1).Find("*", Cells(Rows.Count, 1), xlValues, , 1, 2, 0).Row

bon après midi
@+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

POWERQUERY :: Remplacements multiples dans plusieurs colonnes avec traitements de nettoyage et de conversion de casse
Réponses
0
Affichages
286
oguruma
L
  • Question Question
XL 2016 Création d'une étiquette CB avec Excel
Réponses
5
Affichages
703
lincoln75
L
C
  • Question Question
Autres bug sur une procédure avec textbox contenant un code barre
2
Réponses
15
Affichages
2 K
TooFatBoy
E
  • Résolu(e)
XL 2019 inserer une valeur textbox dans la dernière cellule vide horizontalement
Réponses
7
Affichages
872
escudo
E
POWERQUERY :: Importer un fichier .csv avec construction de critères dynamiques (5 max) de type texte et sélection entre deux dates possible - V2.0
Réponses
0
Affichages
912
oguruma
POWERQUERY :: Renommer les colonnes d'une table - Plusieurs méthodes
Réponses
3
Affichages
2 K
oguruma
S
  • Résolu(e)
Microsoft 365 VBA pour copier/coller une plage de cellule dans un autre onglet en fonction de la date
Réponses
8
Affichages
1 K
Sylvain. B
S
D
  • Question Question
XL 2019 Aide à la compréhension d'un code VBA
Réponses
4
Affichages
1 K
Dudu2
D
  • Question Question
XL 2010 Enregistrement automatique dans un tableau avec une txt_box
Réponses
1
Affichages
777
Dylan67
D
N
  • Résolu(e)
XL 2019 Trouver dernière cellule avec une valeur
Réponses
8
Affichages
1 K
Jacky67
C
  • Résolu(e)
Microsoft 365 Identifier une cellule dans une colonne en fonction d'un numéro identifier dans une autre cellule avec VBA
Réponses
2
Affichages
1 K
Carine35
C
S
  • Question Question
Microsoft 365 Sélectionner la même cellule que la cellule active dans une autre feuille
Réponses
2
Affichages
1 K
ShrekL
S
T
  • Résolu(e)
XL 2016 Erreur d'exécution 9 - L'indice n'appartient pas à la sélection (recherche de la dernière ligne vide d'une feuille)
Réponses
7
Affichages
2 K
tdo88
T
W
  • Question Question
XL 2019 Si une cellule de la colonne contient *...*, alors copie toute dans la ligne dans la ‘feuil ...' »
Réponses
4
Affichages
1 K
st007
S
R
  • Question Question
XL 2010 VBA : consolidation
Réponses
2
Affichages
988
Rousseau Benoit
R
C
  • Résolu(e)
Microsoft 365 SI remplissage cellule (MFC) ALORS transposer la réponse dans une colonne
Réponses
3
Affichages
2 K
Chaine
C
  • Question Question
XL 2013 listbox avec + de 11 colonnes (colonne A à colonne L)
Réponses
11
Affichages
3 K
patricktoulon
V
  • Résolu(e)
XL 2016 Aide Saisie et Envoie d'un mail avec une en-tête et la dernière ligne VBA
Réponses
8
Affichages
1 K
Lolote83
L
B
  • Résolu(e)
Microsoft 365 Obtenir le numéro de ligne de la prochaine cellule non vide dans une colonne
2
Réponses
17
Affichages
3 K
soan
S
M
  • Question Question
Microsoft 365 faire une synthèse dans un classeur à partir d'un nombre aléatoire d'onglets
Réponses
5
Affichages
1 K
chris
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…