Bonjour,
Débutant sur Excel, j'essaye d'ouvrir un document à partir d'une appli vb.
L'ouverture se passe bien mais à chaque fois le curseur se positionne de manière aléatoire. Il y a t-il un moyen de forcer sa position à l'ouverture du document ? (sur la cellule D10 par exemple)
Et puis, plus compliqué : avant l'affichage, je protège certaines zones. Tout se passe bien sauf que ça ne marche qu'une fois !? la fois d'après quand je veux ouvrir mon doc, il me jète en me disant que le doc est protégé ! ?
Voici à quoi ressemble mon code :
Quelqu'un aurait une idée ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Set appExcel = CreateObject("Excel.Application") Set wbExcel = appExcel.Workbooks.Open(App.Path & "\Doc.xls") Set Feuille = wbExcel.Worksheets(1) là je remplis les cellules appExcel.Range("A1:O21").Locked = True appExcel.Range("A54:O73").Locked = True appExcel.Sheets("feuille1").Protect Password:="test", DrawingObjects:=True, Contents:=True, Scenarios:=True appExcel.Visible = True 'Affiche l'application Excel
Merci
Partager