probleme avec cette ligne de VBA

[chrisdu73]

bonjour,

voila mon probleme.

dans une feuille (sources) j'ai une cellule (M5) ou une formule "=SI(L3<2;"tab4";SI(L3<4;"tab3";"tab2"))" me renvoie le nom d'une zone de cellules que j'ai defini.

en VBA avec la ligne du bas a cet endroit range ("m5")je n'arrive pas a lui faire prendre comme valeur se nom qui se trouve en "m5"

Private Sub OptionButton1_Click()
Sheets("Réservation 1").Range("a55").Value = Sheets("Sources").Range("m5").Offset(1, 1).Resize(1, 1).Value
End Sub

en esperant avoir ete claire je vous remerci pour votre aide

(mon fichier est trop gros pour envoi)

Chris

 

[wamme]

Re : probleme avec cette ligne de VBA

Bonjour,
ta macro renvoie en A55 la valeur de N6 et pas M5.
Si c'est bien M5 que tu veux il faut enlever .Offset(1,1)

Ou alors je n'ai pas tout compris

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

tout fonctionne si je remplace M5 par le nom de ma zone tab2 simplement je n'arrive pas a lui donner cette valeur par lecture d'une cellule (dans mon cas en M5)

merci pour votre aide

Chris

 

[wamme]

Re : probleme avec cette ligne de VBA

edit : je supprime ma réponse
je n'ai décidement pas compris le problème

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

en effet j'ai l'erreur #valeur! car ma plage fait plusieurs cellules, alors comment fait on ?
y doit bien avoir une soluce a ca

Chris

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

ou alors comment selectionner en VBA une zone definie (tab2) par exemple, que je puisse lire la donnée correspondante avec ma fameuse ligne

merci

Chris

 

[pierrejean]

Re : probleme avec cette ligne de VBA

bonjour a tous

Un petit fichier pour tenter d'expliquer
Si tu le comprend tu pourras adapter a ce que tu souhaites

 

[wamme]

Re : probleme avec cette ligne de VBA

Tu pourrai selectionner la plage en VBA

Application.Goto Reference:="tab2"

et continuer la macro pour faire un copier/coller

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

ca marche pas voila un fichier pour comprendre mon probleme

merci

Chris

 

[pierrejean]

Re : probleme avec cette ligne de VBA

Re

Vois si cela correspond a ce que tu souhaites

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

desole c'est pas tout a fait se que je cherche mais deja un grand merci de m'aider, j'ai juste besoin de pouvoir arriver a donner un nom a la place de g5 comme expliquer dans le fichier

merci a vous tous

chris

 

[Robert]

Re : probleme avec cette ligne de VBA

Bonsoire fil, bonsoir le forum,

Pas trop compris tes Resize ? mais je verrais les choses comme ça :

Dim pl As String
pl = Range("G5").Value
Sheets("Feuil1").Range("a27").Value = Sheets("Feuil2").Range(pl).Offset(2, 1).Resize(1, 1).Value

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

ca marche toujours pas
je comprend pas

chris

 

[Robert]

Re : probleme avec cette ligne de VBA

Bonsoir le fiol, bonsoir le forum,

Si ça doit marcher avec les deux Boutons d'Option c'est normal que ça ne marche pas ! Il n'y a aucune macro associée... Si je me souviens bien !

Édition :
Oui j'ai vérifié. Tu as utilisé des boutons d'option de la barre d'outil Formulaire et tu as utilisé des codes qui s'appliquent à des boutons d'option de la barre d'outils Boîte à Outils Contrôle. Il te faudrait soit mettre les codes dans un module et ensuite attribuer une macro à chaque bouton. Soit utiliser des boutons d'option de la barre d'outils Boîte à Outils Contrôle. Mais là ça ne risque pas de marcher...

 

[chrisdu73]

Re : probleme avec cette ligne de VBA

merci Robert mais le probleme ne viens pas de la car peut etre que le fichier que j'ai transferé na pas les bons boutons, mais c'etait pour expliquer mon probleme car le fichier original est trop gros.
chris