recherchev

[thalie45]

c'est encore moi,
pouvez vous m'aider pour cet exercice
je n'arrive pas à trouver comment faire pour les de port
Un petit coup de main pour la macro effacer avec un bouton

 

[bcharef]

Re : recherchev

Bonjour Nathalie,
Bonjour à toutes et à tous.

Un essai, dans l'espoir qu'il conviendra à l'exercice.

Il était souhaitable de garder un seul fil, mais, je constate que tu es trop pressée.

A te lire et bon courage.

Amicalement.

BCharef.

 

[thalie45]

Re : recherchev

merci beaucoup pour ton aide.

 

[JCGL]

Re : recherchev

Bonjour à tous,
Salut Bcharef,

A l'appui sur le bouton, VBA ne trouve pas 'Compléments1(1).xls'....

A++
A+ à tous

 

[bcharef]

Re : recherchev

Bonjour Nathalie,
Salut JCGL,
Bonjour à toutes et à tous.

JCGL
A l'appui sur le bouton, VBA ne trouve pas 'Compléments1(1).xls'....

Je trouve une difficulté de compréhension, car je viens d'ouvrir le fichier et l'appui sur le bouton "effacer" fonctionne.

Comme, il est utile de porter à votre connaissance que je suis un ignare en matiére de VBA, et que la macro portée sur le fichier a été réalisé par l'outil d'enregistrement d'une macro; en cas d'amélioration n'hésitez pas.

Salutations distinguées.

BCharef

 

[jeanpierre]

Re : recherchev

Bonsoir bCharef,

Mystère alors car chez-moi il n'y a pas de macro non plus.

Bonne soirée.

Jean-Pierre

 

[bcharef]

Re : recherchev

Bonsoir Nathalie & JCGL,
Salut Jean-Pierre ,
Bonsoir à toutes et à tous.

Essayer de consulter la feuille nommée "Index 2 (2)", qui porte le code ci après:.

Sub Macro4()
' Macro enregistrée le 16/04/2010 par Bcharef'
    Range("B5:B6").Select
    Selection.ClearContents
    Range("B5").Select
End Sub

Et, j'en profite de l'occasion de bien porter des améliorations en cas de necessité.

A vous lire et bon courage.

Cordialement.

BCharef

 

[jeanpierre]

Re : recherchev

Re,

Oui, c'est bien ce que j'ai fait entre autres, mais c'est vide.

Ceci dit, avec l'enregistreur de macro, thalie45 peut faire la même chose et cela lui sera, sans doute, profitable.

Bonne soirée.

Jean-Pierre

 

[JCGL]

Re : recherchev

Bonjour à tous,

Essayer de consulter la feuille nommée "Index 2 (2)"

Il se trouve que je n'ai pas cette feuille...

Un essai quand même pour être productif.

A+ à tous

 

[jeanpierre]

Re : recherchev

re,

"Il se trouve que je n'ai pas cette feuille..."

Il se trouve que j'ai bien cette feuille mais elle est vide.

Mystère, mystère....

 

[bcharef]

Re : recherchev

Re salut JCGL & Jean-Pierre
Re bonsoir à toutes et à tous.

Comme indiquer ci haut, que je suis un ignare en la matiére, j'ai le grand plaisir de vous remercier de vos remarques, car la macro a été enregistré sur le premier fichier d'un autre fil.

A cet effet, j'ai fermé le fichier 'Compléments1(1).xls, comme il l'a indiqué notre ami JCGL.

Le fichier est de retour dans l'espoir qu'il porte la macro concernée et dans l'espoir de porter des corrections nécessaires en cas de nécessite.

A vous lire et bon courage.

Cordialement

BCharef

 

[JCGL]

Re : recherchev

Bonjour à tous,

Capture du VBE qui confirme que je n'ai pas cette feuille "Index 2 (2)" :



A+ à tous

 

[jeanpierre]

Re : recherchev

Re,

Fichier images du fichier déposé par bcharef à 17h42

 

[JCGL]

Re : recherchev

Bonjour à tous,

OK, il y avait une "Index 2 (2)" dans le fichier de 17:42

Attendons les commentaires de l'intéressée

A+ à tous

 

[bcharef]

Re : recherchev

Re bonsoir JCGL & Jean-Pierre,
Re bonsoir à toutes et à tous.

Veuillez bien me confirmer, si le fichier sous le nom essai 2 est correcte ou non.

Comme, j'ai le plaisir de remercier notre ami JCGL des améliorations portées sur le code de la macro par l'élimination de ce qui est en rouge et de son état d'esprit productif et instructif à la fois.

Sub Macro4()
' Macro enregistrée le 16/04/2010 par Bcharef'
    Range("B5:B6")[COLOR=Red].Select
    Selection.[/COLOR]ClearContents
    [COLOR=Red]Range("B5").Select[/COLOR]
End Sub

Salutations.

BCharef