selection plusieur plage

  • Initiateur de la discussion Initiateur de la discussion GHISLAIN
  • Date de début Date de début

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 !

GHISLAIN

XLDnaute Impliqué
bonjour a tous ,

j'utilise ce code pour pour effectuer une action sur les lignes de 15 a 27

For Lig = 15 To 27




je voudrais completer cette action sur d autre ligne en meme temps
soit de 15 a 27 ainsi que 57 a 67 et de 95 a 107

j ai testé cette ligne ci dessous mais sans grand succes
For Lig = 15 To 27 and 27 to 67 and 95 to 107

merci de votre aide a tous

amicalement

ghislain
 
Re : selection plusieur plage

bonjour pierrot93

je cherche juste a continuer l action sur d 'autre lignes mais que ne se suivent pas

le code d'origine (edité au passe par Hippolite)


For Lig = 15 To 27
If .Cells(Lig, Col).Value <> "XXXXX" Then 'recherche sur la plage de la ligne 15 a27 les ligne ne comportant pas de "XXXXX"
.Range("J6").Copy 'collage spécial pour ne pas importer la couleur de fond
Workbooks(FichDest).Sheets(FeuilDest).Range("A" & Ld).PasteSpecial Paste:=xlPasteValues
Workbooks(FichDest).Sheets(FeuilDest).Range("A" & Ld).NumberFormat = "m/d/yyyy"


je voudrai etendre la recherche sur

For Lig = For Lig = 15 To 27 and 27 to 67 and 95 to 107
If .Cells(Lig, Col).Value <> "XXXXX" Then 'recherche sur la plage de la ligne 15 a27 27 a 67 et 95 a 107


merci de ton aide
amicalement
ghislain
 
Re : selection plusieur plage

re pierrot ,

ça ne fonctionne pas , surement du faite que ma ligne est prise en compte completemnt et en utilisant lig de type long et en voulant le remplacer par c ça ne fonctionne pas etant donné que c est variant ou objet

merci encore de ton aide

amicalement

ghislain
 
- 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

D
Réponses
2
Affichages
948
D
L
Réponses
9
Affichages
1 K
Retour