Macro permettant d'afficher et mettre à jour des lignes de tableau

[AdrienG]

Bonjour à tous,

Je voudrais être capable à travers un bouton chercher une valeur dans une cellule et l'afficher dans une ligne de tableau qui est présent sur la même feuille.
Il est important de noter que la ou les valeurs à chercher dans les cellules sont variables, donc quand je click sur le bouton la ligne de mon tableau affiche cette nouvelle valeur.

Vous trouverez ci-joint le fichier concerné et les quelques lignes de code que j'ai faites.
Aujourd'hui je suis capable d'aller chercher ces même valeur et de l'afficher dans un msgBox et non pas dans un tableau.

Merci d'avance.

Adrien

 

[phlaurent55]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Bonjour Adrien,

une fois de plus, ce n'est pas directement un fichier que tu nous joins


à+

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Salut,

je ne comprend pas ce que tu veux exactement comme fichier.

A+

Adrien

 

[phlaurent55]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re,

à l'ouverture, ton fichier contient la copie d'une page Web qui contient un lien qui permet de télécharger le fichier que tu veux nous faire voir

il serait plus commode de n'envoyer que le lien, ou mieux encore, mettre ton fichier directement en pièce jointe sur le forum ( éventuellement le zipper s'il dépasse 48Ko )

à+
Philippe

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Comme ce si?

Cijoint.fr - Service gratuit de dépôt de fichiers

A+

 

[phlaurent55]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re,

c'est déjà plus commode !
je viens de découvrir ton fichier .........quelle usine à gaz

Je voudrais être capable à travers un bouton chercher une valeur dans une cellule et l'afficher dans une ligne de tableau qui est présent sur la même feuille.
Il est important de noter que la ou les valeurs à chercher dans les cellules sont variables, donc quand je click sur le bouton la ligne de mon tableau affiche cette nouvelle valeur.

Quelle cellule, comment la détermines-tu ?
Quelle feuille, quelle ligne, quel endroit dans la ligne ? ( on n'affiche pas une cellule dans une ligne mais plutôt dans une autre cellule)

ne pourrais-tu pas REfaire un fichier plus simple qui représente ton problème (avec seulement quelques lignes utiles à la compréhension) et REexpliquer ta question de manière beaucoup plus précise ................ sinon on va tous s'y perdre

à+
Philippe

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re,

J'ai réussi à faire ce que je voulais en utilisant simplement la fonction copier/coller:

Sub Bouton134_QuandClic()

Dim frf As Range, frd As Range
Dim frf1 As Range, frd1 As Range

Set frf = Worksheets("Pilote").Range("EA3")
Set frfd = Worksheets("Pilote").Range("DU312")
Set frf1 = Worksheets("Pilote").Range("EA2")
Set frfd1 = Worksheets("Pilote").Range("DU313")


frf.Copy
frfd.PasteSpecial (xlPasteValues)
frf1.Copy
frfd1.PasteSpecial (xlPasteValues)
Application.CutCopyMode = False

End Sub

Pourquoi dis tu que mon fichier est une vrai usine à gaz !
Il fonctionne pourtant très bien, je ne sais pas si avec excel on peut obtenir quelque chose de propre et robuste ! La robustesse reste à vérifier !

Merci pour l'interet que tu as porté à mon problème.

Adrien

 

[Staple1600]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Bonjour


Tu peux faire aussi ainsi

Sub a_vl()
With Sheets("Pilote")
    .[DU312] = .[EA3]
    .[DU313] = .[EA2]
End With
End Sub

et pour le fun , également comme ceci

Sub a_vc()
Sheets("Pilote").[DU312].Resize(2) = Application.Transpose(Array(Sheets("Pilote").[EA3].Text, Sheets("Pilote").[EA2].Text))
End Sub

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Super,

Encore plus simple, j'étais mauvaise langue quand je disais que sa ne pouvait pas être propre avec Excel!

Merci JM.

Adrien

 

[Staple1600]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re

J'ai ajouté une seconde version* de la macro (encore plus courte)
(* dans l'édition de mon précédent message)

Tu l'as vu?

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Il ne manque pas DU313 ? Comment le met-on?

Cdlt

 

[Staple1600]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re


Non il ne manque pas DU313 . Il est inclus dans le code

Tu as testé au moins ? (je parle de la macro nommée a_vc )

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Oui j'ai testé et cela ne fonctionne que pour la cellule DU312.
Je me posé la question car effectivement je ne voi pas noté la cellule DU313.

Adrien

 

[Staple1600]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Re

Cela fonctionne chez moi !
Pour te convaincre que mon code inclue bien DU313
Teste ce petit code

Sub OU_est_DU313()
MsgBox Sheets("Pilote").[DU312].Resize(2).Address(0, 0)
End Sub

EDITION: la preuve en image
(du bon fonctionnement de la macro a_vc )

 

[AdrienG]

Re : Macro permettant d'afficher et mettre à jour des lignes de tableau

Très bisare sur mon fichier cela ne fonctionne pas!

Dans les cellules où le résultat doit être copié, j'obtient des #####