Modifier une cellule depuis un textbox

Bonjour,
je cherche comment je peut modifié le contenu d'une cellule depuis une textbox.
j'a fais un userform de recherche qui fonctionne bien mais je voudrai pouvoir modifier la cellule trouver par un bouton "validier la modification"
Configuration: Windows XP
Internet Explorer 7.0

9 réponses

  1. Modérateur
    Bonjour,

    Ben c'est tout bête :

    Range("A10").Value = TextBox1.Value


    m@rina
    0
    1. oui ca je suis d'accord mais la cellule a modifier n'est pas connu elle est rechercher par la recherche depuis la colonne B qui m'affiche toute la ligne
      je met ce que j'ai deja mis comme code cela aideras peut être.

      Private Sub CommandButton2_Click()
      Set objDVD = Application.ThisWorkbook.Worksheets.Item("feuil2")

      Let blnvalidRecherche = True

      'si pas de titre entrer
      If Me.TextBox3.Value = "" Then
      Call MsgBox("Veuiller entrer un titre !", vbCritical + vbOKOnly, "Erreur")
      Let blnvalidRecherche = False
      MsgBox "ce titre n'éxiste pas"

      End If
      Let lngNBligne = 2

      'recherche du DVD
      If blnvalidRecherche = True Then
      Do While objDVD.Cells(lngNBligne, 1) <> ""
      If Me.TextBox3.Value = objDVD.Cells(lngNBligne, 2) Then
      TextBox7 = objDVD.Cells(lngNBligne, 1).Value
      TextBox8 = objDVD.Cells(lngNBligne, 2).Value
      TextBox9 = objDVD.Cells(lngNBligne, 3).Value
      TextBox13 = objDVD.Cells(lngNBligne, 4).Value
      TextBox14 = objDVD.Cells(lngNBligne, 5).Value
      TextBox15 = objDVD.Cells(lngNBligne, 6).Value
      TextBox20 = objDVD.Cells(lngNBligne, 7).Value
      TextBox21 = objDVD.Cells(lngNBligne, 8).Value
      TextBox22 = objDVD.Cells(lngNBligne, 9).Value
      TextBox23 = objDVD.Cells(lngNBligne, 10).Value
      TextBox27 = objDVD.Cells(lngNBligne, 11).Value
      TextBox28 = objDVD.Cells(lngNBligne, 12).Value

      TextBox29 = objDVD.Cells(lngNBligne, 13).Value

      TextBox31 = objDVD.Cells(lngNBligne, 14).Value

      End If
      Let lngNBligne = lngNBligne + 1
      Loop
      End If

      End Sub

      Private Sub TextBox33_Change()

      End Sub

      Private Sub CommandButton3_Click()
      End Sub

      donc ce que je voudrai c'est que je rentre une modif dans le TextBox33_Change() et clique sur CommandButton3_Click() le contenu de la cellule de la colonne 1 change
      0
      1. Modérateur
        Alors essaie http://cijoint.fr/
        Tu peux y mettre jusqu'à 8Mo

        Cela dit, on n'a peut être pas besoin du classeur complet... Juste l'onglet, la Userform, et le code...

        m@rina
        0
        1. http://www.cijoint.fr/cjlink.php?file=cj200903/cijS1Y6ZXd.zip
          j'ai reussis a le joindre :) mdr je suis pas trop doués
          0
          1. Modérateur
            J'ai récupéré le fichier, c'est déjà une bonne chose...
            Je pense que, si tu es débutante en VBA, tu t'es attelée à un projet bien compliqué pour démarrer.

            La UserForm principale a plusieurs boutons de commande qui ouvrent chacun une nouvelle Userform. Jusque là pas de problème. Mais tes Userforms sont vides pour le moment. Les boutons de commande ne mènent à rien.
            Aussi, je ne retrouve pas le code que tu as donné ici et de ce fait, je ne comprends pas bien ce que tu veux faire.

            Mais bon, peut être que d'autres que moi auront des lumière ! ;))

            m@rina
            0
            1. bon je vais tenter de t'expliquer,
              dans l'userform qui s'appele MODIF,j'ai un textbox ou j'ecrit le titre a rechercher pour modifier une cellule de cette ligne(en haut a gauche de ma page modif)exemple "popo"puis je clique sur le bouton rechercher fiche (juste en dessous)
              il me donne toute les données de la ligne que je recherche et les affiche dans chaque textbox ,jusque la aucun probleme ca fonctionne trés bien
              mais en bas de ma page j'ai un textbox(textbox33)ou je doit ecrire la modification a apporté puis cliqué sur un des bouton situé sur la gauche de ma page pour determiner dans quel colonne la modif doit etre faite.
              dans mon exemple "popo" le textbox "n°"donne "j0024"j'ecris j0035 dans le textbox en bas de ma page et puis je clic sur le bouton intitulé n°(sur la droite de ma page)pour qu'il effectue le changement dans la cellule mais justement c'est la que ca coince je sais pas comment faire pour qu'il change dans la cellule
              0
              1. je viens de m'apercevoir que le fichier que j'ai joint tantot n'etais que la premiere ebauche celui-ci devrait peut etre vous eclairer plus sur ce que je veux faire

                http://www.cijoint.fr/cjlink.php?file=cj200903/cijo67knbX.zip
                0