Problème VBA

[dar0609]

Bonjour,

Je cherche à récupérer la cellule d'un onglet dans mon classeur et l'additionner à une cellule de ma feuille active. Pour cela j'ai une combobox qui me renseigne sur l'onglet sur lequel récupérer la 1ère cellule, mais dans mon code il y a une erreur, elle m'affiche "l'indice n'appartient pas à la sélection". Voici mon code ci-dessous quelqu'un pourrait-il m'aider? Merci.

Private Sub CommandButton1_Click()

Dim a As Integer
Dim b As Integer

a = Sheets("combobox.value").Range("C52")

If ComboBox1 <> "" Then

Range("D52") = Range("C52") + a

End If

Unload Me

End Sub

 

[Pierrot93]

Re : Problème VBA

Bonjour,

peut être ceci :

a = Sheets(combobox.value).Range("C52")

bonne journée
@+

 

[dar0609]

Re : Problème VBA

Petite précision : je cherche à garder la formule de calcule, i.e par exemple "C52 + 'Feuil1'!$C52$"

 

[dar0609]

Re : Problème VBA

Merci Pierrot pour ta réponse, cela fonctionne sauf que je ne peux pas voir la formule de calcul, aurais-tu une formule pour ça?

 

[Pierrot93]

Re : Problème VBA

Re,

de quelle formule parles tu ?