IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

renseigner une cellule


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Août 2008
    Messages
    141
    Détails du profil
    Informations forums :
    Inscription : Août 2008
    Messages : 141
    Par défaut 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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2004
    Messages
    44
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 44
    Par défaut
    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?

  3. #3
    Membre confirmé
    Inscrit en
    Août 2008
    Messages
    141
    Détails du profil
    Informations forums :
    Inscription : Août 2008
    Messages : 141
    Par défaut ..
    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

  4. #4
    Membre Expert
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    2 130
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 2 130
    Par défaut
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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 : Sélectionner tout - Visualiser dans une fenêtre à part
    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.

  5. #5
    Membre confirmé
    Inscrit en
    Août 2008
    Messages
    141
    Détails du profil
    Informations forums :
    Inscription : Août 2008
    Messages : 141
    Par défaut la suite
    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

  6. #6
    Membre Expert
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    2 130
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 2 130
    Par défaut
    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+

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2010] Comment renseigner une cellule par un certain nombre de caractère ?
    Par juju05 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 17/04/2015, 13h38
  2. Lancement d'une macro lorsuqe une cellule est renseignée...
    Par rsoul dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 28/10/2008, 10h57
  3. Réponses: 15
    Dernier message: 09/06/2008, 16h51
  4. Réponses: 1
    Dernier message: 14/05/2007, 14h41
  5. lancement d'un popup quand on renseigne une cellule
    Par ricachu dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 18/08/2006, 16h45

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo