envoyer une value d'un macro à un Userform?

[Amrane]

Cher forum,

Mon souci est comment on peut envoyer les valeur "concat1" est " concat_test" au userform "Dual_path_delete" a fin d'effacer le chemin undésiré.

en faite, j'ai essayer de déclarer les variables en dehor du module mais sa n'a pas marché!!😕

votre aide est souhitable

merci
Amr

 

[Zon]

Re : envoyer une value d'un macro à un Userform?

Salut,

Tu ne peux pas utiliser le même nom Dual_path_delete pour un module et une procédure,

Ensuite tu as un bon réflexe de mettre tes variables dans un module à part il faut les mettre en public


Dim concat1, concat_test As Variant
devient
public Concat1
public Concat_test

Ensuite, quand tu lances ton usf tu peux exécuter Dual_path_delete dans userform_initialize ainsi initialiser tes variables.

Sinon je ne comprends pas ce que tu veux faire , donc difficile de t'aider plus sans d'autres explications....


A+++

 

[Amrane]

Re : envoyer une value d'un macro à un Userform (Pb résolu)

Cher Zon,


Salutations🙂, Sa marche,

j'ai modifer ma feuille, maintenent il y a un transfert de valeur entre le macro et le userform,

permettez moi de vous demander encore une fois la façon optimum pour supprimer les linges vide, car j'e suppose que j'ai fait un bricolage seullement.😕

merci d'avance.

Amrane.
Salut

 

[Zon]

Re : envoyer une value d'un macro à un Userform?

Salut

On peut simplifier l'écriture

Sub Delete_free_line()

'Application.ScreenUpdating = False
    Sheets("Reference").Range("h2:z500").Copy Sheets("draft").Range("A1")
    
    
    Sheets("draft").Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

    Sheets("draft").Range("A1:p500").Copy Sheets("Reference").Range("h2")
  
'Application.ScreenUpdating = True



End Sub

Pourquoi ne pas écrire directement sans copier coller si je comprends bien

Sheets("reference").Columns("H:H").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

A+++

 

[Amrane]

Re : envoyer une value d'un macro à un Userform?

Cher Zon,


OUI, j'aimerai bien le faire dans la même feuille, mais est ce que c'est possible de supprimer uniquement quellque cellules uniquement non pas la ligne entiére.


merci,🙄
Amrane.