Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Travailler a plusieurs sur formulaire vba

francinade

XLDnaute Nouveau
Bonjour la communauté,

Voila, je fais une base de données vba pour mon entreprise et le problème se pose que ce fichier dois être utilisé par plusieurs collaborateurs.

Malheureusement j'ai toujours ce fichus "lecture seul", pourriez vous m'aider s'il vous plait.

Merci beaucoup pour votre aide.
 

francinade

XLDnaute Nouveau
A l'intérieur d'un réseau physique il peut y avoir des réseaux virtuels avec des droits différents. c'est votre administrateur réseau (s'il existe) qui configure tout cela.
D'accord aucun problème je vais voir ça avec alors, merci beaucoup pour ses informations !!

Du coup pour fusionner plusieurs vba ensemble croyez vous que cela est possible svp ? Si oui connaissez vous la méthode ou un fil qui spécifie cela ? Pcq jai chercher et je trouve pas
 

dg62

XLDnaute Barbatruc
Il faut voir du côté de la consolidation sur Excel.
 

TAAROA1216

XLDnaute Nouveau

Bonjour,

J'ai eu la même idée, je vais essayer de mettre la "source" en partagé ou en fichier Access, et les "collab" en fichier Excel avec macro qui viendraient se mettre à jour sur le fichier source.
Je me lance ou existe-il déjà des exemples où je puisse m'inspirer ?

Merci
 
Dernière édition:

francinade

XLDnaute Nouveau

Bonjour,

Alors moi j'ai réussi en faisant :
-un classeur nommé "source para"
- un autre classeur collab
- une connexion entre le classeur "source para" et "collab" (ce qui me permet d'importer ma source directement dans mon collab)
- un formulaire dans le collab

dans le formulaire quand je valide une saisie cela fait :

With Workbooks("source para")
.sheets(1).range("d4").value= textbox1.value '(le point est très important avant sheets)
End with
activeWorkbook.refreshall


A adapter selon besoin.


Mon seul inconvénient c'est que je dois ouvrir manuellement mes deux classeur je suis encore en recherche d'un code ouverture/fermeture de classeur afin d'automatiser.
 

TAAROA1216

XLDnaute Nouveau
Bonjour,

Moi j'utilise ce code :
VB:
'
Déclaration des variables
Dim appExcel As Excel.Application 'Application Excel
Dim wbExcel As Excel.Workbook 'Classeur Excel
Dim wsExcel As Excel.Worksheet 'Feuille Excel

'Ouverture de l'application
Set appExcel = CreateObject("Excel.Application")
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\SOURCE.xlsx")
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)

' ton code pour COLLABx

wbExcel.Close 'Fermeture du classeur Excel
appExcel.Quit'Fermeture de l'application Excel

'Désallocation mémoire
Set wsExcel = Nothing
Set wbExcel = Nothing
Set appExcel = Nothing

Le fichier reste non visible ce qui est bien pour mes transferts entre "SOURCE" partagé et "COLLABx" avec macro
 

francinade

XLDnaute Nouveau


Bonjour,

Merci beaucoup ton code fonctionne parfaitement.

Pr contre, tu saurais comment faire un enregistrement automatique, car a chaque fois il me demande si je veux enregistrer et me le mets en copie de mon fichier source ?
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…