Macro
Résolu/Fermé
mihaja28
Messages postés
3
Date d'inscription
samedi 1 août 2015
Statut
Membre
Dernière intervention
4 août 2015
-
1 août 2015 à 21:39
mihaja28 Messages postés 3 Date d'inscription samedi 1 août 2015 Statut Membre Dernière intervention 4 août 2015 - 4 août 2015 à 22:11
mihaja28 Messages postés 3 Date d'inscription samedi 1 août 2015 Statut Membre Dernière intervention 4 août 2015 - 4 août 2015 à 22:11
A voir également:
- Macro
- Macro word - Guide
- Macro logiciel - Télécharger - Organisation
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro recorder - Télécharger - Confidentialité
- Tri automatique excel sans macro ✓ - Forum Excel
3 réponses
Le Pingou
Messages postés
12069
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
6 mai 2024
1 431
1 août 2015 à 23:04
1 août 2015 à 23:04
Bonjour,
Remplacer votre ligne.
Remplacer votre ligne.
Fligne = Range("A" & Rows.Count).End(xlUp)Par celle-ci :
Fligne = Cells(Rows.Count, 1).End(xlUp).Row
mihaja28
Messages postés
3
Date d'inscription
samedi 1 août 2015
Statut
Membre
Dernière intervention
4 août 2015
2 août 2015 à 16:19
2 août 2015 à 16:19
Bonjour Le Pingou,
Merci pour votre réponse; ça marche mais le traitement s'arrête à l'avant dernière ligne; les caractères spéciaux de la dernière ligne ne sont pas traités.
Cordialement,
Mihaja28
Merci pour votre réponse; ça marche mais le traitement s'arrête à l'avant dernière ligne; les caractères spéciaux de la dernière ligne ne sont pas traités.
Cordialement,
Mihaja28
Le Pingou
Messages postés
12069
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
6 mai 2024
1 431
2 août 2015 à 16:59
2 août 2015 à 16:59
Bonjour,
Petite correction, ajouter +1 en fin de ligne :
Petite correction, ajouter +1 en fin de ligne :
Fligne = Cells(Rows.Count, 1).End(xlUp).Row + 1
mihaja28
Messages postés
3
Date d'inscription
samedi 1 août 2015
Statut
Membre
Dernière intervention
4 août 2015
4 août 2015 à 22:11
4 août 2015 à 22:11
Merci Le Pingou
Bonne soirée
Bonne soirée