Renseigner une cellule excel
Fermé
pat redoue
Messages postés
11
Date d'inscription
mardi 5 août 2008
Statut
Membre
Dernière intervention
21 août 2008
-
5 août 2008 à 14:42
pat redoue Messages postés 11 Date d'inscription mardi 5 août 2008 Statut Membre Dernière intervention 21 août 2008 - 5 août 2008 à 15:28
pat redoue Messages postés 11 Date d'inscription mardi 5 août 2008 Statut Membre Dernière intervention 21 août 2008 - 5 août 2008 à 15:28
A voir également:
- Renseigner une cellule excel
- Liste déroulante excel - Guide
- Aller à la ligne dans une cellule excel - Guide
- Verrouiller cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Déplacer une colonne excel - Guide
1 réponse
pat redoue
Messages postés
11
Date d'inscription
mardi 5 août 2008
Statut
Membre
Dernière intervention
21 août 2008
1
5 août 2008 à 15:28
5 août 2008 à 15:28
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
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
