Bonjour j'ai crée une fonction prenant en paramètre des numéros de colonnes et dans la fonction je fait simplement des copier coller entre 3 feuilles suivant diffèrent paramètre, j'ai fait une fonction car j'ai 8 feuilles identique mais qui copier des données sur d'autres feuille et il y a simplement les numeros de colonnes qui changent :
Voici le début de la fonction :
Function EXTRACTION_SALLE(num As Integer, col_donnees As Integer, col_donnees_co2 As Integer, col_calcul_date As Integer, col_calcul_co2 As Integer)
Mon but est de l'associer à une macro mais je n'arrive pas a faire par exemple un appel de fonction :
Sub Extraire()
Dim f1 As Workbook
Set f1 = ThisWorkbook
Dim G1 As Worksheet
Dim nom As String
nom = ActiveSheet.Name
Sheets(nom).Activate
If Left(Range("A1"), 1) = 1 Then
EXTRACTION_SALLE(1, 1, 2, 2, 3)
End If
End Sub
Le code ne marche pas ... Si qqn à une piste je suis preneur :) !