Re : appel de variable dans une fonction...
jai resolu le probleme en mettant directement la procedure dans le deuxieme bouton histoire pour voir. Les deux boutons etant dans la meme feuille de code, avec les variables et les fonction sdeclarees en public. Par contre a ma grande surprise, un autre probleme survient...decidement...Voici le moreceau de code:
'Copiage du contenu du fichier text ouvert dans un nouveau workbook
Workbooks.OpenText Filename:=FileToOpenCAB1 _
, Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier _
:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:= _
False, Comma:=False, Space:=False, Other:=True, OtherChar:="|", _
FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1))
Set wbk2 = ActiveWorkbook
NomFichierLongCAB1 = ActiveWorkbook.Name 'Copiage du nom complet du titre du 2eme workbook dans une variable
NomFichierCourtCAB1 = Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4) 'Copiage du nom sans extension du titre du 2eme workbook dans une variable
' le programme ne fonctionne plus a partir de la, il ne prend pas en compte la selection des 4 premieres lignes. je ne sais pas s'il reactive le deuxieme workbook.
wbk2.Activate 'On reactive le 2eme workbook
Rows("1:4").select
Selection.Delete Shift:=xlUp
Cells.Select
Selection.Copy
Si quelqu'un a une idee, je suis preneure...