Quel expression placer dans une instruction de sélection de lignes
consécutives par leur numéro.
Autrement dit, dans une instruction du type
Rows(StartNoLine ??? EndNoline).Select
où StartNoLine et EndNoline sont des Integer, par quoi faut-il remplacer
les "???", à moins que cela ne soit pas possible... ?
t'avais bien tort, monique, de penser que j'étais inquiet : des batteries ont été installées dans les prés de la sarthe et leurs scuds, bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais nouveau, ils feront bon ménage... allez, mon père, mettez le feu (de Dieu) aux poudres... jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
t'avais bien tort, monique, de penser que j'étais inquiet : des
batteries ont été installées dans les prés de la sarthe et leurs scuds,
bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais
nouveau, ils feront bon ménage...
allez, mon père, mettez le feu (de Dieu) aux poudres...
jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement
rows("3:5").select
"3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et
EndNoline=5
si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble
bilan : une chaine texte "3:5" qui correspond à notre besoin
Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
e$YFr2tqDHA.2636@tk2msftngp13.phx.gbl...
Cela ne peut pas marcher puisque cela concatène des numériques et du
caractère.
t'avais bien tort, monique, de penser que j'étais inquiet : des batteries ont été installées dans les prés de la sarthe et leurs scuds, bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais nouveau, ils feront bon ménage... allez, mon père, mettez le feu (de Dieu) aux poudres... jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
Monique Brunel
;-))
-- Amicalement, Monique (la Wallonne) en campagne pour des sites conformes aux standards et accessibles... http://www.webmaster-hub.com/ et pour les amateurs d'athlétisme... http://users.skynet.be/osga/
"sabatier" a écrit dans le message de news:
t'avais bien tort, monique, de penser que j'étais inquiet : des batteries ont été installées dans les prés de la sarthe et leurs scuds, bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais nouveau, ils feront bon ménage... allez, mon père, mettez le feu (de Dieu) aux poudres... jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
;-))
--
Amicalement,
Monique (la Wallonne)
en campagne pour des sites conformes aux standards et accessibles...
http://www.webmaster-hub.com/
et pour les amateurs d'athlétisme... http://users.skynet.be/osga/
"sabatier" <jpsabatdelaile@wanadoo.fr> a écrit dans le message de
news:3FB556CC.8010400@wanadoo.fr...
t'avais bien tort, monique, de penser que j'étais inquiet : des
batteries ont été installées dans les prés de la sarthe et leurs scuds,
bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais
nouveau, ils feront bon ménage...
allez, mon père, mettez le feu (de Dieu) aux poudres...
jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement
rows("3:5").select
"3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer
!)
supposons StartNoLine =3 et
EndNoline=5
si nous concaténons StartNoLine &":" &EndNoline (& concatène du
texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble
bilan : une chaine texte "3:5" qui correspond à notre besoin
Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
e$YFr2tqDHA.2636@tk2msftngp13.phx.gbl...
Cela ne peut pas marcher puisque cela concatène des numériques et du
caractère.
-- Amicalement, Monique (la Wallonne) en campagne pour des sites conformes aux standards et accessibles... http://www.webmaster-hub.com/ et pour les amateurs d'athlétisme... http://users.skynet.be/osga/
"sabatier" a écrit dans le message de news:
t'avais bien tort, monique, de penser que j'étais inquiet : des batteries ont été installées dans les prés de la sarthe et leurs scuds, bourrés de rillettes, pointent sur moi ; remarque qu'avec le beaujolais nouveau, ils feront bon ménage... allez, mon père, mettez le feu (de Dieu) aux poudres... jps
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
Michel Gaboly
Re,
Start et End sont 2 noms (Insertion, Noms, Définir...) correspondant chacun à une cellule de la feuille.
Comme j'avais mal lu ton message, ;-((( comprenant à tort que tes 2 variables n'étaient pas des Integer, je les avais définies comme repré- sentant chacune une de ces 2 cellules, dont je récupérais ensuite le numéro de ligne.
Voilà.
"Archi" a écrit dans le message de news:
Ouais OK, c'est parce que je sais que mon appli ne dépasse pas la ligne fatidique.
Il n'en reste pas moins que cela reste un problème ridicule d'écriture et de déclaration de variables.
A propos Michel, si tu me lis, comment déclares-tu "Start" et "End" et pourquoi mets-tu Start en End entre "" dans Range() ?
Bon Salut, je vais dîner avec ma Mie, je reviendrai plus tard sur cet échange convivial.
AV a écrit:
...
heu, il me semble qu'il a dit
où StartNoLine et EndNoline sont des Integer
Il m'a semblé avoir ouï dire qu'integer c'était plus ou moins numérique
!
Et que même que si j'étais lui que j'éviterais le Integer pour les lignes !
Dim ...Double ou rien du tout car après la ligne 32 767...plouf ! ....Dépassement de capacité
AV
Re,
Start et End sont 2 noms (Insertion, Noms, Définir...) correspondant
chacun à une cellule de la feuille.
Comme j'avais mal lu ton message, ;-((( comprenant à tort que tes 2
variables n'étaient pas des Integer, je les avais définies comme repré-
sentant chacune une de ces 2 cellules, dont je récupérais ensuite le
numéro de ligne.
Voilà.
"Archi" <defluc@skynet.be> a écrit dans le message de
news:3FB52479.8020701@skynet.be...
Ouais OK, c'est parce que je sais que mon appli ne dépasse pas la ligne
fatidique.
Il n'en reste pas moins que cela reste un problème ridicule d'écriture
et de déclaration de variables.
A propos Michel, si tu me lis, comment déclares-tu "Start" et "End" et
pourquoi mets-tu Start en End entre "" dans Range() ?
Bon Salut, je vais dîner avec ma Mie, je reviendrai plus tard sur cet
échange convivial.
AV a écrit:
...
heu, il me semble qu'il a dit
où StartNoLine et EndNoline sont des Integer
Il m'a semblé avoir ouï dire qu'integer c'était plus ou moins numérique
!
Et que même que si j'étais lui que j'éviterais le Integer pour les
lignes !
Dim ...Double ou rien du tout car après la ligne 32 767...plouf !
....Dépassement de capacité
Start et End sont 2 noms (Insertion, Noms, Définir...) correspondant chacun à une cellule de la feuille.
Comme j'avais mal lu ton message, ;-((( comprenant à tort que tes 2 variables n'étaient pas des Integer, je les avais définies comme repré- sentant chacune une de ces 2 cellules, dont je récupérais ensuite le numéro de ligne.
Voilà.
"Archi" a écrit dans le message de news:
Ouais OK, c'est parce que je sais que mon appli ne dépasse pas la ligne fatidique.
Il n'en reste pas moins que cela reste un problème ridicule d'écriture et de déclaration de variables.
A propos Michel, si tu me lis, comment déclares-tu "Start" et "End" et pourquoi mets-tu Start en End entre "" dans Range() ?
Bon Salut, je vais dîner avec ma Mie, je reviendrai plus tard sur cet échange convivial.
AV a écrit:
...
heu, il me semble qu'il a dit
où StartNoLine et EndNoline sont des Integer
Il m'a semblé avoir ouï dire qu'integer c'était plus ou moins numérique
!
Et que même que si j'étais lui que j'éviterais le Integer pour les lignes !
Dim ...Double ou rien du tout car après la ligne 32 767...plouf ! ....Dépassement de capacité
AV
Michel Gaboly
Bonsoir,
Une précision supplémentaire: Resize n'est disponible que pour les versions d'Excel dont la partie VBA repose sur VB 6, c'est-à-dire Excel 2000 ou plus récent, et aucune version pour Mac ;-((
"Denis Michon" a écrit dans le message de news:c4atb.33102$
Bonjour,
Il y a aussi un truc du genre :
La cellule de son choix et dans la parenthèse de resize(), le nombre de lignes que l'on veut ajouter à la sélection
incluant la ligne de la cellule de départ. Cependant, cette valeur ne peut être négative !
[D10].Resize(5).EntireRow.Select
Range("A5").Resize(5).EntireRow.Select
Salutations!
"ru-th" a écrit dans le message de news:u%
A toi cow-boy ! Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
Bonsoir,
Une précision supplémentaire: Resize n'est disponible que pour les versions
d'Excel dont la partie VBA
repose sur VB 6, c'est-à-dire Excel 2000 ou plus récent, et aucune version
pour Mac ;-((
"Denis Michon" <denis.michon@cgocable.ca> a écrit dans le message de
news:c4atb.33102$Ng3.15056@charlie.risq.qc.ca...
Bonjour,
Il y a aussi un truc du genre :
La cellule de son choix et dans la parenthèse de resize(), le nombre de
lignes que l'on veut ajouter à la sélection
incluant la ligne de la cellule de départ. Cependant, cette valeur ne peut
être négative !
[D10].Resize(5).EntireRow.Select
Range("A5").Resize(5).EntireRow.Select
Salutations!
"ru-th" <ailleurs@nowhere.fr> a écrit dans le message de
news:u%23BTTQuqDHA.512@tk2msftngp13.phx.gbl...
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement
rows("3:5").select
"3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et
EndNoline=5
si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble
bilan : une chaine texte "3:5" qui correspond à notre besoin
Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
e$YFr2tqDHA.2636@tk2msftngp13.phx.gbl...
Cela ne peut pas marcher puisque cela concatène des numériques et du
caractère.
Une précision supplémentaire: Resize n'est disponible que pour les versions d'Excel dont la partie VBA repose sur VB 6, c'est-à-dire Excel 2000 ou plus récent, et aucune version pour Mac ;-((
"Denis Michon" a écrit dans le message de news:c4atb.33102$
Bonjour,
Il y a aussi un truc du genre :
La cellule de son choix et dans la parenthèse de resize(), le nombre de lignes que l'on veut ajouter à la sélection
incluant la ligne de la cellule de départ. Cependant, cette valeur ne peut être négative !
[D10].Resize(5).EntireRow.Select
Range("A5").Resize(5).EntireRow.Select
Salutations!
"ru-th" a écrit dans le message de news:u%
A toi cow-boy ! Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
AV
Il n'en reste pas moins que cela reste un problème ridicule d'écriture et de déclaration de variables.
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ? M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ...) de méconnaissance et/ou de non compréhension de ta part, de ce qu'est une concaténation avec des variables !
AV
Il n'en reste pas moins que cela reste un problème ridicule d'écriture
et de déclaration de variables.
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ?
M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif
...) de méconnaissance et/ou de non compréhension de ta part, de ce qu'est une
concaténation avec des variables !
Il n'en reste pas moins que cela reste un problème ridicule d'écriture et de déclaration de variables.
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ? M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ...) de méconnaissance et/ou de non compréhension de ta part, de ce qu'est une concaténation avec des variables !
AV
sabatier
ridifesse, peut-être? mais arrête de chercher la bagarre, AV...si tu en as vraiment envie, va en australie prendre la place d'olivier magne ou de tout autre rugbyman français...et fasi tout pour te mesurer à cette brute de capitaine anglais... jps
AV a écrit:
M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ....)
ridifesse, peut-être?
mais arrête de chercher la bagarre, AV...si tu en as vraiment envie, va
en australie prendre la place d'olivier magne ou de tout autre rugbyman
français...et fasi tout pour te mesurer à cette brute de capitaine
anglais...
jps
AV a écrit:
M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif
....)
ridifesse, peut-être? mais arrête de chercher la bagarre, AV...si tu en as vraiment envie, va en australie prendre la place d'olivier magne ou de tout autre rugbyman français...et fasi tout pour te mesurer à cette brute de capitaine anglais... jps
AV a écrit:
M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ....)
Archi
Finalement, j'ai adopté ce qui suit
Dim Li As Integer
Li = 1467 Cells(Li, 1).Select
Do While IsNumeric(Selection)
Selection.Cut Cells(Li - 2, 2).Select ActiveSheet.Paste Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction remplaçant celle utilisant la méthode rows qui ne pose que des problèmes . Selection.Delete Shift:=xlUp
Li = Li + 1 Cells(Li, 1).Select Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
Finalement, j'ai adopté ce qui suit
Dim Li As Integer
Li = 1467
Cells(Li, 1).Select
Do While IsNumeric(Selection)
Selection.Cut
Cells(Li - 2, 2).Select
ActiveSheet.Paste
Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction
remplaçant celle utilisant la méthode rows qui ne pose que des problèmes .
Selection.Delete Shift:=xlUp
Li = Li + 1
Cells(Li, 1).Select
Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement
rows("3:5").select
"3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et
EndNoline=5
si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble
bilan : une chaine texte "3:5" qui correspond à notre besoin
Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
e$YFr2tqDHA.2636@tk2msftngp13.phx.gbl...
Cela ne peut pas marcher puisque cela concatène des numériques et du
caractère.
Selection.Cut Cells(Li - 2, 2).Select ActiveSheet.Paste Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction remplaçant celle utilisant la méthode rows qui ne pose que des problèmes . Selection.Delete Shift:=xlUp
Li = Li + 1 Cells(Li, 1).Select Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !) supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ), nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
ru-th
La méthode rows était utilisé pour répondre à ta question de départ qui était
Quel expression placer dans une instruction de sélection de lignes consécutives par leur numéro. Autrement dit, dans une instruction du type Rows(StartNoLine ??? EndNoline).Select où StartNoLine et EndNoline sont des Integer, par quoi faut-il remplacer les "???",
content que tu es trouvé ta solution a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"Archi" a écrit dans le message de news:
Finalement, j'ai adopté ce qui suit
Dim Li As Integer
Li = 1467 Cells(Li, 1).Select
Do While IsNumeric(Selection)
Selection.Cut Cells(Li - 2, 2).Select ActiveSheet.Paste Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction remplaçant celle utilisant la méthode rows qui ne pose que des problèmes .
Selection.Delete Shift:=xlUp
Li = Li + 1 Cells(Li, 1).Select Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
Mais non, mais non... A toi cow-boy !
AV
La méthode rows était utilisé pour répondre à ta question de départ qui
était
Quel expression placer dans une instruction de sélection de lignes
consécutives par leur numéro.
Autrement dit, dans une instruction du type
Rows(StartNoLine ??? EndNoline).Select
où StartNoLine et EndNoline sont des Integer, par quoi faut-il remplacer
les "???",
content que tu es trouvé ta solution
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"Archi" <defluc@skynet.be> a écrit dans le message de news:
3FB6192D.2060000@skynet.be...
Finalement, j'ai adopté ce qui suit
Dim Li As Integer
Li = 1467
Cells(Li, 1).Select
Do While IsNumeric(Selection)
Selection.Cut
Cells(Li - 2, 2).Select
ActiveSheet.Paste
Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction
remplaçant celle utilisant la méthode rows qui ne pose que des problèmes
.
Selection.Delete Shift:=xlUp
Li = Li + 1
Cells(Li, 1).Select
Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement
rows("3:5").select
"3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer
!)
supposons StartNoLine =3 et
EndNoline=5
si nous concaténons StartNoLine &":" &EndNoline (& concatène du
texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble
bilan : une chaine texte "3:5" qui correspond à notre besoin
Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" <alain.vallon@wanadoo.fr> a écrit dans le message de news:
e$YFr2tqDHA.2636@tk2msftngp13.phx.gbl...
Cela ne peut pas marcher puisque cela concatène des numériques et du
caractère.
La méthode rows était utilisé pour répondre à ta question de départ qui était
Quel expression placer dans une instruction de sélection de lignes consécutives par leur numéro. Autrement dit, dans une instruction du type Rows(StartNoLine ??? EndNoline).Select où StartNoLine et EndNoline sont des Integer, par quoi faut-il remplacer les "???",
content que tu es trouvé ta solution a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"Archi" a écrit dans le message de news:
Finalement, j'ai adopté ce qui suit
Dim Li As Integer
Li = 1467 Cells(Li, 1).Select
Do While IsNumeric(Selection)
Selection.Cut Cells(Li - 2, 2).Select ActiveSheet.Paste Range(Cells(Li - 1, 1), Cells(Li + 1, 1)).Select ' Instruction remplaçant celle utilisant la méthode rows qui ne pose que des problèmes .
Selection.Delete Shift:=xlUp
Li = Li + 1 Cells(Li, 1).Select Loop
Salut
Le Cow-boy
ru-th a écrit:
A toi cow-boy !
Merci, Monsieur le Président
pour selectionner des lignes, nous faisons classiquement rows("3:5").select "3:5" est du texte, une string (pas un string, sinon, JPS va rappliquer !)
supposons StartNoLine =3 et EndNoline=5 si nous concaténons StartNoLine &":" &EndNoline (& concatène du texte, ),
nous avons 1 numérique 1 chaine texte 1 numérique liés ensemble bilan : une chaine texte "3:5" qui correspond à notre besoin Testes et tu devrais obtenir le résultat souhaité
rows(StartNoLine & ":" & EndNoline).select
a+ rural thierry Veaux et Broutards d'Anjou Wicasa on kin nape yapi inahni yo (à l'essai)
"AV" a écrit dans le message de news: e$
Cela ne peut pas marcher puisque cela concatène des numériques et du caractère.
oups, merdum de merdum je croyais que c'était toi qui avais écrit cela :
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ? M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ....) de méconnaissance et/ou de non compréhension de ta part, de ce qu'est une concaténation avec des variables !
pardonne-moi, alain, mais les ficelles m'échappent souvent, leur préférant les baguettes, voire les miches à + jps
AV a écrit:
mais arrête de chercher la bagarre, AV...
T'es sur que tu as bien lu le fil ... ??
AV
oups, merdum de merdum
je croyais que c'était toi qui avais écrit cela :
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ?
M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif
....) de méconnaissance et/ou de non compréhension de ta part, de ce
qu'est une
concaténation avec des variables !
pardonne-moi, alain, mais les ficelles m'échappent souvent, leur
préférant les baguettes, voire les miches
à +
jps
oups, merdum de merdum je croyais que c'était toi qui avais écrit cela :
Si c'est un problème ridicule pourquoi donc les déclarer (les variables) ? M'est avis que ça n'est qu'un problème (je te laisse définir le qualificatif ....) de méconnaissance et/ou de non compréhension de ta part, de ce qu'est une concaténation avec des variables !
pardonne-moi, alain, mais les ficelles m'échappent souvent, leur préférant les baguettes, voire les miches à + jps
