Modifier une ligne

mutzik

XLDnaute Barbatruc

• 17 Août 2006

• #2

Re : Modifier une ligne

Bonjour Gulibert,

Avoue quand même qu'il est difficile de t'aider avec les maigres données que tu nous fourni. Avec ton fichier, cela irait un ptit peu mieux (sans données confid. bien sur)

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #3

Re : Modifier une ligne

Bonjour,
J'ai enfin réussi à joindre un fichier sur ce forum:http://cjoint.com/?irlbigtY5n
Donc en fait c'est lorsque je selectionne un élement dans ma listbox en haut à gauche que pouf il s'efface je ne comprends pas...
Merci pour ton aide c'est vraiment sympa

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 17 Août 2006

• #4

Re : Modifier une ligne

Bonjour

Et bien c'est justement ton Cell.Value = ActiveCell qui met la zizanie.

Etant donné que la cellule active est vide tu mets du vide dans ta cellule donc cela vide ta listbox aussi puisque tu es en rowsource.

Pourquoi tu as mis ce Cell.Value = ActiveCell ? C'est quoi le but

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #5

Re : Modifier une ligne

Bonjour pascal, re mutzik,

Pascal76 à dit:

Pourquoi tu as mis ce Cell.Value = ActiveCell ? C'est quoi le but

Cliquez pour agrandir...

En fait c'était pour sélectionner la ligne correspondant à mon élément pour pouvoir la modifier😕
Mais je me disais bien que ca venait de la, j'arrive pas à trouver comment sélectionner cette ligne😱
Merci beaucoup pour votre aide c'est adorable

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 17 Août 2006

• #6

Re : Modifier une ligne

Re

Pour selectionner la cellule fait plutot

cell.select

Sinon tu n'es pas obligé de selectionner pour modifier

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #7

Re : Modifier une ligne

Re pascal, bonjour aimable visiteur,
Pourrais tu m'expliquer comment je puis modifier ma ligne sans la selectionner s'il te plais.
Merci beaucoup

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 17 Août 2006

• #8

Re : Modifier une ligne

re

exemple

Code:

Dim lig As Long

Private Sub LiBFiche_Click()
Dim Plage As Range
Dim Cell As Range
Set Plage = Sheets(1).Range("A3:A" & DerLigne)
For Each Cell In Plage
If Cell.Value = LiBFiche.Value Then
TxtPoste = Cell.Offset(0, 2).Value
TxtNumSer = Cell.Offset(0, 8).Value
TxtNumVign = Cell.Offset(0, 3).Value
TxtNumSer.Visible = True
TxtNumVign.Visible = True
TxtPoste.Visible = True
Label2.Visible = True
Label3.Visible = True
Label4.Visible = True
lig =cell.row
exit for
End If
Next Cell
'CommandButton1.Visible = True
End Sub


Private Sub CommandButton1_Click()
       
    Cells(lig, 13).Value = Me.TxtTravaux.Value
    Cells(lig, 14).Value = Me.TxtObs.Value
    Cells(lig, 15).Value = Me.TxtCapit.Value
    Unload Me
End Sub

Bon courage

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #9

Re : Modifier une ligne

Re,
Ca ne supprime plus il est vrai mais excel me dit que lig n'est pas reconnu alors que je l'ai bien inséré dans les instructions, je ne comprends pas... Si tu peux m'éclairer?
Merci beaucoup

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 17 Août 2006

• #10

Re : Modifier une ligne

Re

Tu l'as bien mis comme moi en dehors d'un sub et tu as supprimé ta déclaration lig que tu avais sur
Private Sub CommandButton1_Click()

??

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #11

Re : Modifier une ligne

Re
Non je ne l'ai pas mis hors du sub car il me dit que seul les commentaires peuvent se mettre hors du sub donc il refuse. Et je n'arrive pas à le forcer à l'extérieur.

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 17 Août 2006

• #12

Re : Modifier une ligne

Re

Tu en as déjà des variables déclarées en haut de ton code de ton uf

tu as juste à rajouter ton

Dim lig as long

en dessous des autres et à retirer ta déclaration de ton
Private Sub CommandButton1_Click()

 

Vote positif 0 Vote négatif

G

gulibert

Guest

• 17 Août 2006

• #13

Re : Modifier une ligne

Re,
Ok c'est bon en fait je l'ai mis en haut sous un OptionExplicit et ça marche nickel, merci beaucoup c'est vraiment sympa de ta part d'être si disponible pour les autres.
Bon apétit

 

Vote positif 0 Vote négatif