<HTML>bonjour
pour le second problème tu peux lire les valeurs d'un classeur fermé.
tu pourrais donc utiliser une fonction dans une formule ou une procédure à exécuter.
je te laisse ci-dessous un exemple
A comparer en termes de rapidité avec la solution de Bruno
cette fonction Excel 4 de J. Walkenbach qui lit des données
dans un classeur fermé.
Public Function GetValue(ByVal path, ByVal file, ByVal sheet, ByVal ref)
' John Walkenbach (Macro XL4)
' ======================
' Retrieves a value from a closed workbook
Dim Arg As String
' Make sure the file exists
If Right(path, 1) <> "\" Then path = path & "\"
If Dir(path & file) = "" Then
GetValue = "File Not Found"
Exit Function
End If
' Create the argument
Arg = "'" & path & "[" & file & "]" & sheet & "'!" & _
Range(ref).Range("A1").Address(, , xlR1C1)
' MsgBox Arg
' Execute an XLM macro
GetValue = Application.ExecuteExcel4Macro(Arg)
DoEvents
End Function
Sub ColleDansFeuille()
Dim x
For x = 1 To 10
ActiveSheet.Range("C" & x).Value = _
GetValue("C:\Mes documents\", "MonFichier.xls", "Feuil1", "C" & x)
Next x
End Sub
'tu peux utliser getvalue dans une cellule, écris y =GetValue() puis clique sur le signe égal pour faire apparaître l'assistant formules
autre requête de ta part :
<<Le vendeur ouvrira ce modele, et en faisant enregistrer sous, il y aura automatiquement le fichier suivi dun chiffre numero auto avec l'extension xls ok????>> je crois que j'ai compris. Utilise une procédure évenèmentielle workbook_beforeclose et profites-en pour afficher ta propre boîte de dialogue paramétrée : application.dialogs(xldialogsaveas).show arg1:="mon doc"
Liste des arguments de cette boîte dans l'ordre : document_text, type_num, prot_pwd, backup, write_res_pwd, read_only_rec
excuse moi un tant soit peu de l'ordre dans lequel j'ai répondu, du désordre plutôt ;-)
je n'ai pas compris le problème suivant :
<<Mon gros probleme : c'est que le planning etant lié avec la facture, il est remis a zéro a chaque fois. Les données "dispo" et "indispo" sur le planning se restent pas ! >>
moi j'aimerais bien tes classeurs ;-)))))
bye
steph</HTML>