bonjour
je cherche à récupérer des éléments/ documents d'une vue LOTUS NOTES via vba excel (version 2002)
je n'y connais pas grand chose en VBA. et mes connaissances en form, methodes et autres sont proches du 0 absolu..
mais je suis prêt à essayer.
Grace à de mutiples exemples récupérés ici et là (merci encore à tous ceux qui ont posté) je suis arrivé (péniblement) à :
-me connecter à Lotus
-recuperer la liste des "vues" lotus dans un tableau variant .
ça cela marche
ci dessous le code juste avant mon blocage :
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
| Dim vlist As Variant
Dim ShowView() As Variant
...
vlist = db.Views ' Récupère les vue de la base
k = UBound(vlist) ' Récupère le nombre de vue
ReDim Preserve ShowView(k)
n = -1
For i = 0 To k
If Len(vlist(i).Name) > 0 Then
FieldName = Trim(vlist(i).Name)
If Mid(FieldName, 1, 1) <> "(" Then
' vues cachées non affichées
n = n + 1
ShowView(n) = FieldName
End If
End If
Next i |
et maintenant je bloque j'aimerais afficher, "bêtement",
la liste obtenue dans une fenêtre
selectionner le nom de la vue qui m'intéresse,
récuperer le choix et passer à la suite..
asvue = ????? là je bloque
Set vue = db.GetView(asvue)
.................
...........
merci d'avance pour toutes les suggestions
Partager