code en macro pour archive

[matsam]

Bonjour,

Je cherche à trouver un moyen de relier un numero de cellule au mois qui lui correspond dans une archive avec chaque année et les mois qui lui correspondent.

sinon comment dans la macro peut on insérer une variable de la forme string
à cette fonction

ActiveChart.SetSourceData Source:=Sheets("pluviométrie").ActiveCell,

merci

voici ma feuille :

 

[GeoTrouvePas]

Re : code en macro pour archive

Bonjour,

relier un numero de cellule au mois qui lui correspond dans une archive avec chaque année et les mois qui lui correspondent.

ça vient peut être de moi mais même après 10 lectures et relectures, je ne comprend absolument pas ce que tu veux dire.

sinon comment dans la macro peut on insérer une variable de la forme string à cette fonction

ActiveChart.SetSourceData Source:=Sheets("pluviométrie").ActiveCell,

Insérer ok mais insérer à la place de quoi ? pour définir quoi ? C'est pour sheets("pluviométire") ?

Si c'est le cas, il suffit de faire comme ça :

Sub SelectionFeuille()
    
    Dim Feuille As String
    Feuille = "Feuil1"
    Sheets(Feuille).Select

End Sub

 

[matsam]

Re : code en macro pour archive

non ce n'est pas ça, sheet("pluviometrie").activecell renvoie le texte qui se trouve dans la cellule selectionnée. je voudrais remplacer ça par une variable de type string. j'espere avoir été assez clair!
merci

 

[matsam]

Re : code en macro pour archive

Dans le cas général comment peut on mettre une variable apres := ?

par exemple

ActiveChart.SetSourceData Source:=Sheets("pluviométrie").Range("D12:J12"),

ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="mois davril"

 

[kjin]

Re : code en macro pour archive

bonjour,

j'espere avoir été assez clair!

A quoi peut bien nous servir ton fichier, vide et sans la moindre explication ?!
En attendant l'éclaircie

MonString = Sheets("pluviométrie").Range("D12:J12"),
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:=MonString

A+
kjin

 

[matsam]

Re : code en macro pour archive

ces lignes de code font partie d'un code pour créer un graphique. je souhaite ne pas mettre tout le temps la meme chose et mettre une variable à la place.
dans les exemples à la place de
Sheets("pluviométrie").Range("D12:J12"),
par exemple

 

[matsam]

Re : code en macro pour archive

Quelqu'un pour m'aider?