Rechercher : dans
Par :

Modifier une cellule depuis un textbox

Dernière réponse le 28 mar 2009 à 17:55:25 jaushuaglp, le 27 mar 2009 à 23:18:09 
 Signaler ce message aux modérateurs

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

Meilleures réponses pour « modifier une cellule depuis un textbox » dans :
[VBA] Détection de modification de cellule Voir Exemple pour une MFC avec plus de 3 conditions. Private Sub Worksheet_Change(ByVal Target As Range) Dim Cel As Range For Each Cel In Target 'Adapter la/les plages. If Not Intersect(Cel, Range("B1:B30,D1:D30")) Is Nothing...
Modifier son fichier Hosts VoirPOURQUOI modifier le fichier Hosts ? COMMENT modifier le fichier Hosts ? Où se trouve le fichier Hosts original ? Que contient-il ? Méthode de modification Restaurer le fichier Hosts à son état d'origine Alternative à Rhosts POURQUOI...
[Excel] Colorer des cellules sur conditions VoirIl existe dans Excel des fonctions très pratiques mais peu connues et peu utilisées. Exemple : vous souhaitez qu'une cellule se colore automatiquement en rouge (ou autre mise en forme de police, de bordure, de trame) selon une condition : un...
[Word] Suivi des modifications VoirMicrosoft Word possède un outil très astucieux : le suivi des modifications. Il se peut que des personnes viennent corriger, modifier un document que vous venez de créer. Cependant, vous désirez savoir ce qu'ils ont modifié dans votre...
Mise en forme de données VoirStyles de données Que la cellule contienne une valeur littérale saisie par vous-même ou le résultat d’une formule, vous affectez un style aux données de cette cellule en définissant ce que l’on appelle le format de la cellule : cela conditionne...
SQL - Modification de table VoirModification de table Il est possible de supprimer une table grâce à la clause DROP, il existe aussi des commandes moins extrêmes permettant L'ajout de colonnes La modification de colonnes La suppression de colonnes Enfin, il est possible...
Tableur - Les cellules VoirLa notion de cellule On appelle "cellule" l'intersection entre une ligne (horizontale) et une colonne (verticale) de la feuille de calcul. Ainsi le nom de la ligne combiné au nom de la colonne donne les coordonnées d'une cellule (le terme d'adresse...

1

m@rina, le 28 mar 2009 à 02:24:41

Bonjour,

Ben c'est tout bête :

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



m@rina
Inutile de me poser des questions en MP... 
Définitivement je n'y réponds pas... Le forum est fait pour ça.

Répondre à m@rina

2

jaushuaglp, le 28 mar 2009 à 11:54:26

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

Répondre à jaushuaglp

3

m@rina, le 28 mar 2009 à 13:12:51

Bonjour,

Ce serait plus simple si tu mettais un exemple de ton classeur à notre disposition :
http://cjoint.com

m@rina Inutile de me poser des questions en MP... 
Définitivement je n'y réponds pas... Le forum est fait pour ­ça.

Répondre à m@rina

4

jaushuaglp, le 28 mar 2009 à 13:43:07

Je ne sais pas mettre mon fichier dans http://cjoint.com car il est trop volumineux desolé

Répondre à jaushuaglp

5

m@rina, le 28 mar 2009 à 13:53:43

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 Inutile de me poser des questions en MP... 
Définitivement je n'y réponds pas... Le forum est fait pour ­ça.

Répondre à m@rina

6

jaushuaglp, le 28 mar 2009 à 14:03:29

http://www.cijoint.fr/cjlink.php?file=cj200903/cijS1Y6ZXd.zi­p
j'ai reussis a le joindre :) mdr je suis pas trop doués

Répondre à jaushuaglp

7

m@rina, le 28 mar 2009 à 16:22:22

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
Inutile de me poser des questions en MP... 
Définitivement je n'y réponds pas... Le forum est fait pour ­ça.

Répondre à m@rina

8

jaushuaglp, le 28 mar 2009 à 17:31:50

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

Répondre à jaushuaglp

9

 jaushuaglp, le 28 mar 2009 à 17:55:25

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.zi­p

Répondre à jaushuaglp
Collection CommentÇaMarche.net