Bonjour,

J'ai un fichier Excel qui contient une feuille cachée INFO, qui contient elle-même une plage de donnée intitulée ProjectList (cellules A2 to A9 à ce jour).

J'aimerais qu'une valeur soit ajoutée dynamiquement à cette plage de données. Voici le code que j'ai pour le moment.

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
Sub ADD_PROJECT()
 
Application.ScreenUpdating = False
Application.DisplayAlerts = False
 
    Workbooks.Open Filename:="C:\...\fichier.xlsx"
 
        Sheets("INFO").Visible = True
 
        'Worksheets("INFO").Range("A10").Value = "TEST"
 
            Application.Goto Reference:="ProjectList"
            xxx
 
        Sheets("INFO").Visible = False
 
    ActiveWorkbook.Save
    ActiveWorkbook.Close
 
Application.DisplayAlerts = True
Application.ScreenUpdating = True
 
End Sub
J'ai testé le Selection.ClearContents à la place des xxx et cela fonctionne bien. Mais je ne trouve pas ce qu'il faut mettre pour ajouter une valeur supplémentaire.

D'avance merci pour votre retour.

Camzo