renseigner une cellule excel Fermé

Question

Bonjour,
je fais mes premiers pas en vba et donc mes problemes commencent..
j essai de faire en sorte que des que j'ouvre un certain fichier excel, l' on me demande renseigner le contenu de la premiere cellule et que celle ci se remplisse de son nouveau contenu
voila le code pourri

Sub essai()

Dim truc As CellFormat

truc = InputBox("ERBWEBWEB", "")
myworksheet.Cells(1, 1).Select

Set Cells(1, 1).Value = "truc"

end sub

En fait, j'ai plusieurs info a rentrer et je sais que je dois utiliser un userform(fonction qui m'est tout a fait obscure) pour arriver a ce que je veux idealement a savoir renseigner l'ensemble de mes variables  d'une traite> si quelqu'ame genereuse serait m'aider a comprendre le fonctionnement d'une userform...


merci de venir a mon secours...

pat redoue · Answer

voila jai retravailler mon code un peu mais ca fonctionne pas plus personne n'a une idee??


Sub essai()

Dim truc As Integer
Dim lacell As Range
truc = InputBox("ERBWEBWEB", "")
myworksheet.Cells(1, 1).Select

Set lacell = Cells(1, 1)
With lacell
.AddComment
With .Comment
.Visible = True
.Text Text:=truc
End With
End With
End Sub

Renseigner une cellule excel

1 réponse

Discussions similaires