Bonjour,
Je voudrais inscrire la même info en une seule passe dans une sélection
multiple.
J'y arrive si j'exprime explicitement les cellules concernées.
Parexemple
Range("A2,A8,A12").Formula="toto"
C'est ce que j'obtiens en saisie automatique de la macro
Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en
utilisant
l'adresse d'une cellule de référence .
J'ai essayé la forme suivante qui ne fonctionne pas et je ne
vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques
chose)
Set adr = ActiveCell Range(adr.Offset(0, 6), adr.Offset(0, 10)) = "toto"
AV
papou
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
Bonjour
Si j'ai bien compris ?
Dim adr As Range
Set adr = ActiveCell
Dim TableRange$
TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," &
adr.Offset(0, 10).Address
Range(TableRange).Formula = "toto"
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
michdenis
Bonjour jeclephi,
Il y a aussi ceci :
Set adr = ActiveCell adr.Offset(, 6).Resize(, 5) = "toto"
Salutations!
"jeclephi" a écrit dans le message de news: uC$ Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)
Set adr = ActiveCell
adr.Offset(, 6).Resize(, 5) = "toto"
Salutations!
"jeclephi" <jcpto.sabatini@wanadoo.fr> a écrit dans le message de news: uC$vPMWUGHA.5004@TK2MSFTNGP11.phx.gbl...
Bonjour,
Je voudrais inscrire la même info en une seule passe dans une sélection
multiple.
J'y arrive si j'exprime explicitement les cellules concernées.
Parexemple
Range("A2,A8,A12").Formula="toto"
C'est ce que j'obtiens en saisie automatique de la macro
Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en
utilisant
l'adresse d'une cellule de référence .
J'ai essayé la forme suivante qui ne fonctionne pas et je ne
vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques
chose)
Set adr = ActiveCell adr.Offset(, 6).Resize(, 5) = "toto"
Salutations!
"jeclephi" a écrit dans le message de news: uC$ Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)
Bonsoir et merci pour ces réponses qui ne me donnent que l'embarras du choix Jcp
"jeclephi" a écrit dans le message de news: uC$
Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)
Bonsoir et merci pour ces réponses qui ne me donnent que l'embarras du choix
Jcp
"jeclephi" <jcpto.sabatini@wanadoo.fr> a écrit dans le message de news:
uC$vPMWUGHA.5004@TK2MSFTNGP11.phx.gbl...
Bonjour,
Je voudrais inscrire la même info en une seule passe dans une sélection
multiple.
J'y arrive si j'exprime explicitement les cellules concernées.
Parexemple
Range("A2,A8,A12").Formula="toto"
C'est ce que j'obtiens en saisie automatique de la macro
Je voudrais trouver la syntaxe qui me permettrait de faire la même chose
en utilisant
l'adresse d'une cellule de référence .
J'ai essayé la forme suivante qui ne fonctionne pas et je ne
vois pas le remède(bien que les guillemets ont l'air d'y être pour
quelques chose)
Bonsoir et merci pour ces réponses qui ne me donnent que l'embarras du choix Jcp
"jeclephi" a écrit dans le message de news: uC$
Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)
question bien comprise et la réponse est appréciée, mais quel est le rôle du signe "$" dans la déclaration de la var TableRange Merci Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
question bien comprise et la réponse est appréciée, mais quel est le rôle du
signe "$" dans la déclaration de la var TableRange
Merci
Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
eatjaNXUGHA.4436@TK2MSFTNGP10.phx.gbl...
Bonjour
Si j'ai bien compris ?
Dim adr As Range
Set adr = ActiveCell
Dim TableRange$
TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," &
adr.Offset(0, 10).Address
Range(TableRange).Formula = "toto"
question bien comprise et la réponse est appréciée, mais quel est le rôle du signe "$" dans la déclaration de la var TableRange Merci Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
isabelle
bonjour Jcp,
Dans Visual Basic, le signe dollar ($) est le caractère de déclaration du type String, % type Integer @ type Currency ! type Single # type Double
isabelle
question bien comprise et la réponse est appréciée, mais quel est le rôle du signe "$" dans la déclaration de la var TableRange Merci Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
bonjour Jcp,
Dans Visual Basic, le signe dollar ($) est le caractère de déclaration du type String,
% type Integer
@ type Currency
! type Single
# type Double
isabelle
question bien comprise et la réponse est appréciée, mais quel est le rôle du
signe "$" dans la déclaration de la var TableRange
Merci
Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
eatjaNXUGHA.4436@TK2MSFTNGP10.phx.gbl...
Bonjour
Si j'ai bien compris ?
Dim adr As Range
Set adr = ActiveCell
Dim TableRange$
TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," &
adr.Offset(0, 10).Address
Range(TableRange).Formula = "toto"
Dans Visual Basic, le signe dollar ($) est le caractère de déclaration du type String, % type Integer @ type Currency ! type Single # type Double
isabelle
question bien comprise et la réponse est appréciée, mais quel est le rôle du signe "$" dans la déclaration de la var TableRange Merci Jcp
"papou" <cestpasbon@çanonplus> a écrit dans le message de news:
Bonjour Si j'ai bien compris ? Dim adr As Range Set adr = ActiveCell Dim TableRange$ TableRange = adr.Address & "," & adr.Offset(0, 6).Address & "," & adr.Offset(0, 10).Address Range(TableRange).Formula = "toto"
Cordialement Pascal
jeclephi
Mia c'est bien sur Merci à Isabelle pour sa réponse Jcp
"jeclephi" a écrit dans le message de news: uC$
Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)
Mia c'est bien sur
Merci à Isabelle pour sa réponse
Jcp
"jeclephi" <jcpto.sabatini@wanadoo.fr> a écrit dans le message de news:
uC$vPMWUGHA.5004@TK2MSFTNGP11.phx.gbl...
Bonjour,
Je voudrais inscrire la même info en une seule passe dans une sélection
multiple.
J'y arrive si j'exprime explicitement les cellules concernées.
Parexemple
Range("A2,A8,A12").Formula="toto"
C'est ce que j'obtiens en saisie automatique de la macro
Je voudrais trouver la syntaxe qui me permettrait de faire la même chose
en utilisant
l'adresse d'une cellule de référence .
J'ai essayé la forme suivante qui ne fonctionne pas et je ne
vois pas le remède(bien que les guillemets ont l'air d'y être pour
quelques chose)
Mia c'est bien sur Merci à Isabelle pour sa réponse Jcp
"jeclephi" a écrit dans le message de news: uC$
Bonjour, Je voudrais inscrire la même info en une seule passe dans une sélection multiple. J'y arrive si j'exprime explicitement les cellules concernées. Parexemple Range("A2,A8,A12").Formula="toto" C'est ce que j'obtiens en saisie automatique de la macro Je voudrais trouver la syntaxe qui me permettrait de faire la même chose en utilisant l'adresse d'une cellule de référence . J'ai essayé la forme suivante qui ne fonctionne pas et je ne vois pas le remède(bien que les guillemets ont l'air d'y être pour quelques chose)