Bonjour

Je me permets de demander votre aide pour des questions de débutant.

D'abord, j'ai un bloquage concernant un import de donnnées. Je cherche à prendre une table dans un document pour l'importer dans un autre document. L'import se fait, mais les données arrivent au mauais endroit de la bonne feuille. Comment faire pour que la table soit collée en B5 de la feuille "CHARGES" ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Sub Macro()
 
'
    Dim derlig As Integer
'
    Windows("BAL_44.xlsx").Activate
    Sheets("Données").Select
    derlig = LastLigData()
    For i = 5 To derlig
        NumCompte = Cells(i, 2).Value
        Intitulé = Cells(i, 3).Value
        Débit = Cells(i, 4).Value
        Crédit = Cells(i, 5).Value
        If NumCompte Like "60*" Then
            Windows("abc.xlsm").Activate
            Sheets("CHARGES").Select
            Cells(i, 2) = NumCompte
            Cells(i, 3) = Intitulé
            Cells(i, 4) = Débit
            Cells(i, 5) = Crédit
            Windows("BAL_44.xlsx").Activate
            Sheets("Données").Select
        End If
    Next i
End Sub
Ensuite, j'ai un souci pour exprimer le critère "ne commence pas par" dans la fonction SOMME.SI.ENS.

=SOMME.SI.ENS(H5:H300;B5:B300; "<>63*";B5:B300; "<>64*")
ici je cherche à faire la somme des cellules de la plage H5:H300, pour lesquelles les cellules de la plage B5:B300 ne commencent pas par 63 et 64.

Merci pour votre aide !!

Saddam