Editer une feuille excel sous reseau
Résolu/Fermé
marooned
Messages postés
9
Date d'inscription
mardi 1 juillet 2008
Statut
Membre
Dernière intervention
18 mai 2018
-
Modifié par marooned le 1/10/2014 à 22:45
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 3 oct. 2014 à 09:13
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 3 oct. 2014 à 09:13
A voir également:
- Editer une feuille excel sous reseau
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Déplacer une colonne excel - Guide
- Calculer une moyenne sur excel - Guide
- Si et excel - Guide
4 réponses
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
3 oct. 2014 à 08:10
3 oct. 2014 à 08:10
Bonjour,
Tu as 3 choses à adapter : le nom des deux feuilles et le chemin complet (avec nom du fichier et extension)
Tu as 3 choses à adapter : le nom des deux feuilles et le chemin complet (avec nom du fichier et extension)
Private Sub CommandButton1_Click() Dim Wbk As Workbook, Chemin As String Dim Client As String, Référence As String, Montant As Double, Jour As Date, Qui As String With ThisWorkbook.Sheets("Feuil1") ' A ADAPTER Client = .Range("A3") Référence = .Range("E20") Montant = .Range("M23") Jour = CDate(.Range("C12")) Qui = .Range("B6") End With Chemin = "N:\Users\franck\Desktop\Mouvement\Travail\ClasseurTest.xlsx" 'A ADAPTER Set Wbk = Workbooks.Open(Chemin) With Wbk.Sheets("Feuil1") 'A ADAPTER dl = .Range("A" & Rows.Count).End(xlUp).Row .Range("A" & dl) = Client .Range("B" & dl) = Référence .Range("C" & dl) = Montant .Range("D" & dl) = Jour .Range("E" & dl) = Qui End With ActiveWorkbook.Close True End Sub
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
2 oct. 2014 à 10:21
2 oct. 2014 à 10:21
Bonjour,
Qu'appelles tu "éditer"?
Dis nous ce que tu veux faire exactement .
Dis nous également si tu disposes des accès au réseau au répertoire et fichier "distant".
S'agit-il d'un réseau d'entreprise, de particulier ou Internet?
Qu'appelles tu "éditer"?
Dis nous ce que tu veux faire exactement .
Dis nous également si tu disposes des accès au réseau au répertoire et fichier "distant".
S'agit-il d'un réseau d'entreprise, de particulier ou Internet?
marooned
Messages postés
9
Date d'inscription
mardi 1 juillet 2008
Statut
Membre
Dernière intervention
18 mai 2018
5
2 oct. 2014 à 12:37
2 oct. 2014 à 12:37
Merci Pijaku pour ta réponse,
pour faire simple, j'aimerais copier des certain cellules (ex: A3; E20; C12; B6) d'un classeur local vers un classeur excel qui se trouve sous réseau à partir. en sachant que les cellules copiées vers la feuille en réseau soient classée sous forme de tableau.
donc à chaque fois que je clique sur le bouton "save" de mon classeur local une ligne dans le classeur en réseau est ajoutée.
pour faire simple, j'aimerais copier des certain cellules (ex: A3; E20; C12; B6) d'un classeur local vers un classeur excel qui se trouve sous réseau à partir. en sachant que les cellules copiées vers la feuille en réseau soient classée sous forme de tableau.
donc à chaque fois que je clique sur le bouton "save" de mon classeur local une ligne dans le classeur en réseau est ajoutée.
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
2 oct. 2014 à 12:49
2 oct. 2014 à 12:49
j'aimerais copier des certain cellules (ex: A3; E20; C12; B6)
OK. Lesquelles???
qui se trouve sous réseau à partir
A partir de ou?
soient classée sous forme de tableau.
C'est à dire?
Cela semble clair pour vous, mais pour nous ça ne l'est pas du tout...
OK. Lesquelles???
qui se trouve sous réseau à partir
A partir de ou?
soient classée sous forme de tableau.
C'est à dire?
Cela semble clair pour vous, mais pour nous ça ne l'est pas du tout...
marooned
Messages postés
9
Date d'inscription
mardi 1 juillet 2008
Statut
Membre
Dernière intervention
18 mai 2018
5
2 oct. 2014 à 15:46
2 oct. 2014 à 15:46
J'ai un classeur "X" avec lequel j'établis des offres commerciales qui se trouve dans mon PC, que j'ouvre, il contient des cellules que je veux classer dans un tableau.
J'ouvre mon classeur "X", je l'utilise, j'ai un resultat, et lorsque je clique sur un bouton "save" (par exemple), une macro s'exécute et copiera certaines cellule de "X" (par exemple : A3="client"; E20="référence"; M23=Montant; C12="date"; B6="etablie par") vers mon classeur "Y" qui lui se trouve dans un chemin que je connais : path = "\\chemin1\chemin2\chemin3\".
au niveau du classeur "Y" (le classeur sous réseau) les cellules devront être classées sous forme de tableau
Client | Référence | Montant | Date | Etablis par
__________________________________________
A3 | E20 | M23 | C12 | B6
A3' | E20' | M23' | C12' | B6'
etc...
Ceci pour me permettre de savoir quelles sont les offres et le montant des offres que j'ai pu faire.
J'ouvre mon classeur "X", je l'utilise, j'ai un resultat, et lorsque je clique sur un bouton "save" (par exemple), une macro s'exécute et copiera certaines cellule de "X" (par exemple : A3="client"; E20="référence"; M23=Montant; C12="date"; B6="etablie par") vers mon classeur "Y" qui lui se trouve dans un chemin que je connais : path = "\\chemin1\chemin2\chemin3\".
au niveau du classeur "Y" (le classeur sous réseau) les cellules devront être classées sous forme de tableau
Client | Référence | Montant | Date | Etablis par
__________________________________________
A3 | E20 | M23 | C12 | B6
A3' | E20' | M23' | C12' | B6'
etc...
Ceci pour me permettre de savoir quelles sont les offres et le montant des offres que j'ai pu faire.
3 oct. 2014 à 08:43
3 oct. 2014 à 09:10
dl = .Range("A" & Rows.Count).End(xlUp).Row
car la macro ne passait pas à la ligne suivante . pour le reste tout est nickel.... merci à jamais Pijaku.
3 oct. 2014 à 09:13
De rien.
A+