accéder à 1 cellule à partir d'une autre

[pitchoune85]

bonjour le forum
j'ai une petite question.
je suis par exemple en d21
j'aimerai faire référence à la cellule d6
je pense que c'est avec range ou cells et activecell mais je tourne en rond :
si je suis en d21 --> faire référence à d6
' f21 ' f6
....
si quelqu'un pouvait m'expliquer
merci

 

[porcinet82]

Salut Pitchoune85,

Je ne saisie pas tres bien le sens de ta quesiton mais je me risque quand meme a t'apporter une réponse. Si tu est en D21 et que tu veux faire référence a la cellule D6, tu peux utiliser cells(6,4).value (ou .select si tu veux la selectionner) tu peux utiliser également range('D6').value ou encore activecell.offset(-15, 0).value

J'espère que tu trouveras ton bonheur la dedans, si ce n'est pas le cas reviens avec un exemple?

@+

 

[vekmort]

bonjour et d'avance, chapeau à celui qui explique...
la référence :
Range('D6')
Cells(6,4)
Activecell est la cellule active donc Range('D21')
bon courage
Vekmort :evil:

 

[pitchoune85]

houps
j'ai du mal m'expliquer alors voici un extrait de mon fichier
j'ai mon tableau (calendrier qui va de la colonne M à AN mais qui à un nombre de ligne variable.

j'ai 4 boutons : AP, AN, ... et EFFACER
j'aimerai que, n'importe où que je sois dans mon tableau, quand je clique sur le bouton effacer, cela m'enlève la valeur (AN, AP, ..., la couleur et que ça me remette la formule initiale).

voilà, j'espère que vous comprendrez mieux
merci [file name=copier_formule.zip size=18630]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/copier_formule.zip[/file]

 

[pitchoune85]

houps
j'ai du mal m'expliquer alors voici un extrait de mon fichier
j'ai mon tableau (calendrier qui va de la colonne M à AN mais qui à un nombre de ligne variable.

j'ai 4 boutons : AP, AN, ... et EFFACER
j'aimerai que, n'importe où que je sois dans mon tableau, quand je clique sur le bouton effacer, cela m'enlève la valeur (AN, AP, ..., la couleur et que ça me remette la formule initiale).

voilà, j'espère que vous comprendrez mieux
merci [file name=copier_formule_20060323174657.zip size=18630]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/copier_formule_20060323174657.zip[/file]

 

[Charly2]

Bonjour Pitchoune85, Porcinet et Vekmort, bonjour à toutes et à tous

Je te renvoie ton fichier avec les procédures associées au 'boutons' légèrement modifiées, sauf pour Effacer car le code restaure également les MEFC.

Je pense que tu devrais regarder la formule entrée en ligne 6 : les fériés vont de B9 à B21 puis sautent à B321 (je suppose que c'est B21 :huh: ).

[file name=Pitchoune85_CopierFormule.zip size=21004]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Pitchoune85_CopierFormule.zip[/file]

A+

 

[pitchoune85]

ouah !!! 4h36 : je ne l'ai encore jamais fait et heureusement vu que je pars ua boulot à 07h00...
je te remercie pour tout ce travail...charly2 : je ne sais comment te remercier
B) par contre j'ai 2 petits soucis
1--> résolus : pour les boutons AP et V, il manquait 'cell' devant '.Formula1RC1'

2--> j'ai un pblème avec le bouton effacer et la gestion des couleurs : regarde, essaye de mettre par exple une LMMJV en AP puis efface : les couleurs se mélangent : peux tu y apporter une solution et ce sera parfait : j'essaye depuis tout à l'heure : le mieux que j'ai réussi, c'est de les mettre en blancm, mais j'arrive pas à rajouter la conditon gris 1/2

merci
sab [file name=CopierFormule.zip size=22063]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CopierFormule.zip[/file]

 

[Charly2]

Bonjour Sab, bonjour à toutes et à tous

Eh oui 4h36 ! Autant mettre à profit les périodes d'insomnies, mais je me rends compte que je ne suis pas aussi attentif qu'en journée :S

Alors pour me faire pardonner de mes grossières erreurs, voici ton fichier rectifié et revu pour accélérer la mise à jour (le recalcul ralentissait les procédures)...

[file name=Pitchoune85_CopierFormuleV2.zip size=24278]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Pitchoune85_CopierFormuleV2.zip[/file]

A+

 

[xavier]

B)

normalement, tu crées une procédure

du type :

sub décaler

worksheets('lenomdetafeuille').range('j21').offset(nbredeligneàdécaler,nbredecolonnesàdécaler).select

end sub

pour toi, ça donne :

sub décaler

worksheets('feuil1').range('j21').offset(0,-15).select

end sub