Problème de macros horizontale

[FRED83500]

Bonjour, j'essaie désespérément de trouver une solution pour insérer dans un tableau horizontal (à partir d'un userform) la date et le nombre de visiteurs par jour avec une feuille par mois.

Lorsque je veux entrer par exemple pour le 05 janvier 2013 18 visiteurs, ça fonctionne en vertical mais je n'arrive pas à l'intégrer en horizontal.

A la suite du remplissage du tableau, un graphique devrait se mettre à jour.


Je vous serais extrêmement reconnaissant de me mettre sur la voie.

D'avance je vous remercie pour l'aide que vous pourriez m'apporter...

 

[david84]

Re : Problème de macros horizontale

Bonjour,
en essayant d'aller au plus simple et en gardant la structure de ta macro, tu peux tester ceci :

Private Sub CommandButton1_Click() 'Valider
Dim i, Col As Integer
i = Format(Me.TextBox1, "mmmm")
With Sheets(i)
    Col = Format(Me.TextBox1, "dd") + 2
    .Cells(35, Col) = CDbl(Me.TextBox2)
End With
Unload Me
End Sub

Cela suppose que la ligne de renseignement du nombre des visiteurs soit toujours la ligne 35 et que le mois "01" commence toujours en C35 et ce quelles que soient les feuilles (sinon il te faudra préalablement rechercher cette ligne dans ta macro, par exemple en passant par Find).
A+

 

[FRED83500]

Re : Problème de macros horizontale

Merci beaucoup,

Enfin je peux arrêter de me faire des cheveux blancs.

Tout fonctionne parfaitement, je n'ai plus qu'à finir les graphiques de l'année 2013.

- LA SEYNE BASKET