Modifier des codes par macro
#1
Régulier XLPages

Inscription: 26/05/2007

Messages: 44

Posté le : 30-10-2010 18h55
Bonjour,

Peut-on, avec une macro commandée par un bouton, supprimer et remplacer, les exemples de lignes suivantes :
Sinon en bref : pouvoir modifier les lignes de code avant de les utilisées.

1) Dans le code feuille 2 (Essai) :
Ligne 55 ---->
Select Case Application.CountIf([B14:B19], "n") par ----> Select Case Application.CountIf([B14:B18], "n")

2) Dans le code UserForm1:
Ligne 71 ---> isoler (ou supprimer) Label14.Caption = [B19] . Value
Ligne 149 --> isoler (ou supprimer) Label14.Caption = ""
Ligne 190 --> isoler (ou supprimer) Label14.Caption = [B19] . Value
Ligne 242 --> n = Application.CountA([B14:B19]) par ----> n = Application.CountA([B14:B18])
Ligne 243 -->
Range("B14:B19")(n, 1).ClearContents par ----> Range("B14:B18")(n, 1).ClearContents[/b][/b]
Ligne 255 --> isoler (ou supprimer) Label14.Caption = [B19] . Value

Cordialement
Merci de votre aide
Poppy

Hors Ligne
Rapport   Haut 

Re: Modifier des codes par macro
#2
Débutant XLPages

Inscription: 05/07/2007
De Aubenas(07)

Messages: 9

Système d'exploitation:
PC
Version Excel utilisée:
2000
Posté le : 01-11-2010 10h47
Bonjour,

on peut, bien sûr en utilisant vbcomponents (je regarderai s'il n'y a pas un topo là dessus sur ce site...)

Sinon, pourquoi ne pas utiliser une macro paramétrée ?
style
sub lamacro(lazone,flag)

'flag est un booléen qui ordonnera d'isoler tes controles:
Select Case Application.CountIf(range(lazone), "n")
...
If flag then
Label14.visible=false
...
else
Label14.Caption = [B19] . Value
....
end if

et pour commander tout ca

macro header
dim drapeau as boolean
drapeau=true
la macro
lamacro "B2:B18", drapeau





Amicalement
Michel_M
Hors Ligne
Rapport   Haut 

Re: Modifier des codes par macro
#3
Régulier XLPages

Inscription: 26/05/2007

Messages: 44

Posté le : 01-11-2010 17h59
Bonjour,
Merci de me répondre
Je regarde et je te tiens au courant

Cordialement
Poppy
Hors Ligne
Rapport   Haut 

Re: Modifier des codes par macro
#4
Régulier XLPages

Inscription: 26/05/2007

Messages: 44

Posté le : 01-11-2010 19h30
Bonsoir,
Voici un fichier exemple.
Merci de ton aide


Pièce jointe:
zip Fichier Exemples.zip   [ Taille: 48.68 Ko - Téléchargements: 451 ]
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes