renseigner une cellule

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 mon code pourri

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub essai()   Dim truc As String Dim lacell As Range   truc = InputBox("Inscrivez votre commentaire") lacell = Cells(1, 1) With lacell .Addvalue With .Value .Visible = True .Text Text:=truc End With End With   End Sub

---

Bonjour,
mmm d'une part il existe une balise [/code/] (le dièse juste au dessus) pour mettre en forme ton code, et d'autre part... C'est quoi la question?

he bien ce code ne fonctionne pas lorsque je rentre mon contenu, que la box s'afffiche , que je la rempli et bien mon entree ne se reflete pas dans la cellule A1 de ma spreadsheet active

Salut will Igetit et le forum
Utilise les balises, ça rend le poste plus lisible

With met un préfixe au instructions commençant par un point (ou "!", mais pas là).

Code:

---

1 2 3 4 5 6 7 8

Sub essai() Dim Truc As String Dim Lacell As Range   truc = InputBox("Inscrivez votre commentaire") set lacell = Cells(1, "A") Lacel=truc End Sub

---

on peut aussi écire :

Code:

---

1 2 3

Sub essai() Range("A1")=InputBox("Inscrivez votre commentaire") End Sub

---

Le classeur et la feuille sont fixés par défaut à ceux actifs. Si on veut écrire 1 et 2 en A1 et B1 dela feuille F du classeur C:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

WorkBooks("C").sheets("F").range("A1")=1 WorkBooks("C").sheets("F").range("B1")=2   'Mais quand on est feignant ------------- With WorkBooks("C") .sheets("F").range("A1")=1 .sheets("F").range("B1")=2 end with 'ou encore --------------------------- With WorkBooks("C").sheets("F") .range("A1")=1 .range("B1")=2 end with 'ou encore --------------------------- With WorkBooks("C") with .sheets("F") .range("A1")=1 .range("B1")=2 end with end with

---

Tout les codes on la même signification. Je n'emploie pas ".Value", parce que c'est la méthode/propriété par défaut
A+
Edit
au lieu de jouer à celui qui connaît, utilise Range("adresse de la plage").
Quand tu mets le point, VBA te propose une liste déroulant des Propriétés/méthodes qui sont valides pour l'objet Range. Une fois que ça fonctionne, tu peux allèger le code en employant d'autres notations. Les propriétés/méthodes sont liées à lobjet à partir du moment où il est défini correctement.
Tu ne peux pas inventer, utiliser des propriétés/méthodes non reconnues valides pour un objet par excel.

Merci beaucoup you re the best!

cela dit, je pense que tu pourras m'etre encore d'une grande aide. en fait pour tout t'expliquer je travaille sur une enorme spreadsheet (avec un livre de VBA en allemand qui ne m'est pas d'un grand recours.. puisqu'il est en allemand lol) et j'ai un certain nombre de donnee a incrementer pour faire tourner les fonctions que j'ai mis dans cette feuille . Ce que j'essai de faire, c'est d'avoir une box qui me demande de placer ces donnees sans aller chercher les cellules, ce que grace a toi je peux desormais faire. cependant , j'aurais aime pouvoir les rentrer toutes d'une traite et pouur cela j'ai cru comprendre que je dois utiliser une userform mais le ddictatel m'est bien obscur... saurais tu la demarche a suivre?
encore merci en tout cas pour ton aide
A+
Will

Salut will Igetit et le forum
Pense à préciser que ton Excel est en allemand. En VBA, c'est pas génant, mais pour les formules...

Si tu veux remplir des cellules à partir de Textbox, il faut connaître la TextBox et l'adresse de destination (complête).
Le plus simple, c'est nun fichier d'essais avec le réroulement de ce que tu fait (manuellement, physiquement).
A+