Appeler une fonction

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 :) !

Bonjour data4lab, le forum,

Peut-être faut-il préciser quelle cellule doit recevoir le résultat ?

Cordialement,

Bonjour,

Enlever les parenthèses

EXTRACTION_SALLE 1, 1, 2, 2, 3

Ou avec les parenthèses

Résultat = EXTRACTION_SALLE(1, 1, 2, 2, 3)

Bonjour xorsankukai,

le souci est que ma fonction ne s'appliquer pas à une seule cellule, elle fait de grand copier coller

Merci thev, cela fonctionne !

Rechercher des sujets similaires à "appeler fonction"