faire un choix automatique sur 2 lignes de procédures
7 réponses
DC
Bonjour à tous,...........................Excel 2000 sous XP
Merci de me lire......................bonne journée,
Voilà; en début d'éxécution de macro, j'ai 2 choix qui à première vue sont
incompatibles l'un (qui fait monter le curseur) avec l'autre ( qui fait le
contraire ),
Aussi j'aimerais pouvoir y introduire le choix d'un "Ou" ou bien une
condition d'un "Si".........ou peut-être autre chose...???
....................Voici les 2 lignes de choix en question.................
'----------------------------------------------------------------
Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate
Range("A" & ActiveCell.Row).End(xlDown).Offset(1, 0).Activate
'-----------------------------------------------------------------
L'objectif étant de retrouver le curseur dans la permière cellule vide vers
le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
ou dans les colonnes écrites,
...........Merci d'y penser...!!!
Cordialement.........................d'avance Merci...!!!...........DC
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
AV
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate
| L'objectif étant de retrouver le curseur dans la permière cellule vide vers
| le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
DC
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!! Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" a écrit dans le message de news: %23%
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le
sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!!
Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
%23%23qBy0hMGHA.1532@TK2MSFTNGP12.phx.gbl...
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate
| L'objectif étant de retrouver le curseur dans la permière cellule vide
vers
| le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en
dessous
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!! Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" a écrit dans le message de news: %23%
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
DC
Bonjour à tous,........................Bonjour AV,
Merci de me lire,.................bonne journée,
Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout en bas des autres lignes écrites.......je m'explique..........!!! Si le curseur se trouve dans la zone de la dernière plage, çà fonctionne parfaitement, par contre, un peut plus bas, s'il y a une autre plage, c'est elle qui devient active et le curseur va se placer sous cette plage, et là çà ne va pas, Est-il possible de faire la même chose, mais dans les lignes vides entres les 2 plages,.................Merci d'y penser...!!! '------------------------------------------------------ [A:A].Find("*", , 1, , 1, 2).Item(2).Select '------------------------------------------------------ Cordialement,......Merci d'avance........au plaisir de te lire.......DC
"DC" a écrit dans le message de news: 43f32e61$0$29227$
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!! Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" a écrit dans le message de news: %23%
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
Bonjour à tous,........................Bonjour AV,
Merci de me lire,.................bonne journée,
Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y
est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout
en bas des autres lignes écrites.......je m'explique..........!!!
Si le curseur se trouve dans la zone de la dernière plage, çà fonctionne
parfaitement, par contre, un peut plus bas, s'il y a une autre plage, c'est
elle qui devient active et le curseur va se placer sous cette plage, et là
çà ne va pas,
Est-il possible de faire la même chose, mais dans les lignes vides entres
les 2 plages,.................Merci d'y penser...!!!
'------------------------------------------------------
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
'------------------------------------------------------
Cordialement,......Merci d'avance........au plaisir de te lire.......DC
"DC" <da.campion@hotmail.fr> a écrit dans le message de news:
43f32e61$0$29227$8fcfb975@news.wanadoo.fr...
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le
sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!!
Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
%23%23qBy0hMGHA.1532@TK2MSFTNGP12.phx.gbl...
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate
| L'objectif étant de retrouver le curseur dans la permière cellule vide
vers
| le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en
dessous
Bonjour à tous,........................Bonjour AV,
Merci de me lire,.................bonne journée,
Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout en bas des autres lignes écrites.......je m'explique..........!!! Si le curseur se trouve dans la zone de la dernière plage, çà fonctionne parfaitement, par contre, un peut plus bas, s'il y a une autre plage, c'est elle qui devient active et le curseur va se placer sous cette plage, et là çà ne va pas, Est-il possible de faire la même chose, mais dans les lignes vides entres les 2 plages,.................Merci d'y penser...!!! '------------------------------------------------------ [A:A].Find("*", , 1, , 1, 2).Item(2).Select '------------------------------------------------------ Cordialement,......Merci d'avance........au plaisir de te lire.......DC
"DC" a écrit dans le message de news: 43f32e61$0$29227$
Bonjour à tous,................................Bonjour AV,
Merci de ta réponse très positive,............bonne journée,
En éffet, c'est plus que parfait et çà fonctionne du premier coup, dans le sens éxacte de mes espérances,........un grand Merci...!!!
Le savoir faire, c'est quand même formidable...!!! Cordialement..........Merci...!!!...Merci...!!!..................DC
"AV" a écrit dans le message de news: %23%
|Range("A" & ActiveCell.Row).End(xlUp).Offset(1, 0).Activate | L'objectif étant de retrouver le curseur dans la permière cellule vide vers | le bas de la colonne et ceci, ou qu'il se trouve à lorigine, déja en dessous
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
AV
AV
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y | est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout | en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la dernière cellule renseignée de la colonne A, la réponse est en adéquation.... me semble-t-il ! Il faudrait m'éclairer (de même que les autres, je suppose) sur ton attente exacte...
Exemple simple : En colonne A, il n'y a que 2 cellules renseignées : A5 et A10 La cellule active est laquelle ? Tu veux "attérir" dans quelle cellule ?
AV
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y
| est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout
| en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la
dernière cellule renseignée de la colonne A, la réponse est en adéquation.... me
semble-t-il !
Il faudrait m'éclairer (de même que les autres, je suppose) sur ton attente
exacte...
Exemple simple :
En colonne A, il n'y a que 2 cellules renseignées : A5 et A10
La cellule active est laquelle ?
Tu veux "attérir" dans quelle cellule ?
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y | est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout | en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la dernière cellule renseignée de la colonne A, la réponse est en adéquation.... me semble-t-il ! Il faudrait m'éclairer (de même que les autres, je suppose) sur ton attente exacte...
Exemple simple : En colonne A, il n'y a que 2 cellules renseignées : A5 et A10 La cellule active est laquelle ? Tu veux "attérir" dans quelle cellule ?
AV
DC
Bonsoir à tous,............................Bonsoir AV,
Merci de me répondre,.....................bonne soirée,
En effet tu avais bien décodé mes explications, mais c'est moi qui me suis mal expliqué,.........je vais essayé d'être plus clair.....
Voici un exemple par le concret,
Inter. en SA pour le centre.............2.........35,00?.......... 70,00? Inter. en VV pour le centre.............3.........35,00?.........105,00? Prise de Courant standard..............5.........38,00?.........190,00? A5 Montan HT.......365,00?
Inter. en SA pour le centre.............2.........35,00?.......... 70,00? Inter. en VV pour le centre.............3.........35,00?.........105,00? Prise de Courant standard..............5.........38,00?.........190,00? A10 Montan HT.......365,00?
La cellule active dans le premier cas, serait "A5" La cellule active dans le deuxième cas, serait "A10"
Mais il peut y avoir beaucoups plus de cas, le N° de ligne est toujours relatif et la colonne toujours "A"
C'est pour pouvoir éxécuter la macro qui calcul le Montant HT.... Par ce que, à chaque instant de l'éxécution du devis, je peut avoir à modifier un paramètre et relancer cette macro de calcul dans une des plages existantes,.....j'espère avoir été simple et clair......... ................mais bon....!!!...............Merci d'y penser.......... Cordialement,........d'avance Merci.....au plaisir de te lire......DC
"AV" a écrit dans le message de news:
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y | est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout | en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la dernière cellule renseignée de la colonne A, la réponse est en adéquation.... me semble-t-il ! Il faudrait m'éclairer (de même que les autres, je suppose) sur ton attente exacte...
Exemple simple : En colonne A, il n'y a que 2 cellules renseignées : A5 et A10 La cellule active est laquelle ? Tu veux "attérir" dans quelle cellule ?
AV
Bonsoir à tous,............................Bonsoir AV,
Merci de me répondre,.....................bonne soirée,
En effet tu avais bien décodé mes explications, mais c'est moi qui me suis
mal expliqué,.........je vais essayé d'être plus clair.....
Voici un exemple par le concret,
Inter. en SA pour le centre.............2.........35,00?.......... 70,00?
Inter. en VV pour le centre.............3.........35,00?.........105,00?
Prise de Courant standard..............5.........38,00?.........190,00?
A5
Montan HT.......365,00?
Inter. en SA pour le centre.............2.........35,00?.......... 70,00?
Inter. en VV pour le centre.............3.........35,00?.........105,00?
Prise de Courant standard..............5.........38,00?.........190,00?
A10
Montan HT.......365,00?
La cellule active dans le premier cas, serait "A5"
La cellule active dans le deuxième cas, serait "A10"
Mais il peut y avoir beaucoups plus de cas, le N° de ligne est toujours
relatif et la colonne toujours "A"
C'est pour pouvoir éxécuter la macro qui calcul le Montant HT....
Par ce que, à chaque instant de l'éxécution du devis, je peut avoir à
modifier un paramètre et relancer cette macro de calcul dans une des plages
existantes,.....j'espère avoir été simple et clair.........
................mais bon....!!!...............Merci d'y penser..........
Cordialement,........d'avance Merci.....au plaisir de te lire......DC
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
uruHxjkMGHA.2040@TK2MSFTNGP14.phx.gbl...
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y
| est d'autres lignes d'écrites plus bas, sinon le curseur va se placer
tout
| en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la
dernière cellule renseignée de la colonne A, la réponse est en
adéquation.... me
semble-t-il !
Il faudrait m'éclairer (de même que les autres, je suppose) sur ton
attente
exacte...
Exemple simple :
En colonne A, il n'y a que 2 cellules renseignées : A5 et A10
La cellule active est laquelle ?
Tu veux "attérir" dans quelle cellule ?
Bonsoir à tous,............................Bonsoir AV,
Merci de me répondre,.....................bonne soirée,
En effet tu avais bien décodé mes explications, mais c'est moi qui me suis mal expliqué,.........je vais essayé d'être plus clair.....
Voici un exemple par le concret,
Inter. en SA pour le centre.............2.........35,00?.......... 70,00? Inter. en VV pour le centre.............3.........35,00?.........105,00? Prise de Courant standard..............5.........38,00?.........190,00? A5 Montan HT.......365,00?
Inter. en SA pour le centre.............2.........35,00?.......... 70,00? Inter. en VV pour le centre.............3.........35,00?.........105,00? Prise de Courant standard..............5.........38,00?.........190,00? A10 Montan HT.......365,00?
La cellule active dans le premier cas, serait "A5" La cellule active dans le deuxième cas, serait "A10"
Mais il peut y avoir beaucoups plus de cas, le N° de ligne est toujours relatif et la colonne toujours "A"
C'est pour pouvoir éxécuter la macro qui calcul le Montant HT.... Par ce que, à chaque instant de l'éxécution du devis, je peut avoir à modifier un paramètre et relancer cette macro de calcul dans une des plages existantes,.....j'espère avoir été simple et clair......... ................mais bon....!!!...............Merci d'y penser.......... Cordialement,........d'avance Merci.....au plaisir de te lire......DC
"AV" a écrit dans le message de news:
| Petit inconvénient, dans le fonctionnement actuel, il ne faut pas qu'il y | est d'autres lignes d'écrites plus bas, sinon le curseur va se placer tout | en bas des autres lignes écrites
Ben la question (décodée) étant de se positionner sur la 1° ligne après la dernière cellule renseignée de la colonne A, la réponse est en adéquation.... me semble-t-il ! Il faudrait m'éclairer (de même que les autres, je suppose) sur ton attente exacte...
Exemple simple : En colonne A, il n'y a que 2 cellules renseignées : A5 et A10 La cellule active est laquelle ? Tu veux "attérir" dans quelle cellule ?
AV
AV
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi) l'effet escompté mais plutôt celui inverse ! Bon.....je ne doute qu'un passant comprendra mieux que moi tes désidératas... Je dois me sauver...
AV
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi) l'effet
escompté mais plutôt celui inverse !
Bon.....je ne doute qu'un passant comprendra mieux que moi tes désidératas...
Je dois me sauver...
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi) l'effet escompté mais plutôt celui inverse ! Bon.....je ne doute qu'un passant comprendra mieux que moi tes désidératas... Je dois me sauver...
AV
DC
Bonsoir à tous,.........................BonsoirAV,
Merci de t'es réponses,..............C'est sympa...!!! '--------------------------------------------------- [A:A].Find("*", , 1, , 1, 2).Item(2).Select '--------------------------------------------------- Navré de t'avoir embrouillé dans mes explications, mais ta première version était parfaite, il suffirait qu'elle ne prenne pas en compte les autres groupes du dessous.....enfin bref...!!!...un grand Merci...!!!......et au plaisir ...!!!
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi) l'effet escompté mais plutôt celui inverse ! Bon.....je ne doute qu'un passant comprendra mieux que moi tes désidératas... Je dois me sauver...
AV
Bonsoir à tous,.........................BonsoirAV,
Merci de t'es réponses,..............C'est sympa...!!!
'---------------------------------------------------
[A:A].Find("*", , 1, , 1, 2).Item(2).Select
'---------------------------------------------------
Navré de t'avoir embrouillé dans mes explications, mais ta première version
était parfaite, il suffirait qu'elle ne prenne pas en compte les autres
groupes du dessous.....enfin bref...!!!...un grand Merci...!!!......et au
plaisir ...!!!
"AV" <alainPFFFvallon@wanadoo.fr> a écrit dans le message de news:
e93idOlMGHA.1088@tk2msftngp13.phx.gbl...
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi)
l'effet
escompté mais plutôt celui inverse !
Bon.....je ne doute qu'un passant comprendra mieux que moi tes
désidératas...
Je dois me sauver...
Bonsoir à tous,.........................BonsoirAV,
Merci de t'es réponses,..............C'est sympa...!!! '--------------------------------------------------- [A:A].Find("*", , 1, , 1, 2).Item(2).Select '--------------------------------------------------- Navré de t'avoir embrouillé dans mes explications, mais ta première version était parfaite, il suffirait qu'elle ne prenne pas en compte les autres groupes du dessous.....enfin bref...!!!...un grand Merci...!!!......et au plaisir ...!!!
Ben dis donc... ma demande d'éclaircissements n'a pas eu (pour moi) l'effet escompté mais plutôt celui inverse ! Bon.....je ne doute qu'un passant comprendra mieux que moi tes désidératas... Je dois me sauver...
