Transfère de lignes via une macro sur une autre feuille de mon classeur

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #16

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

J'ai juste une dernière question afin d'alimenter un onglet débit ou crédit en fonction du signe sur la fiche de saisie comment faire ?

Cliquez pour agrandir...

Modifier ton fichier exemple en conséquence.

avec un exemple de la situation de départ et du résultat que tu veux obtenir.

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #17

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Ok merci, et pour le fait que la macro ne transfère pas l'ensemble des données de mon fichier de facturation, peux tu m'éclairer (macro incomplète ?)

Merci

 

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #18

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Tout est déjà expliqué dans la macro, non ?
(voir les commentaires en vert dans celle-ci)
Relire mon message de 9h58.

J'attends ta pièce jointe modifiée (qui inclut un onglet Débit et un onglet Crédit)

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #19

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Ci joint ma pièce modifiée comme tu le remarquera, toutes les données ne sont pas transférer.

Merci

 

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #20

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Tu as cherché à comprendre ce que veut dire le 5 dans la ligne ci-dessous
.Cells(j, "B").Resize(, 5).Copy Sheets("SAISIE").Range("A65536").End(xlUp)(2)

Change ce 5 avec le nombre de colonnes adéquat.

(Post scriptum; ton fichier n'a pas été joint)

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #21

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Désolé en PJ

 

Pièces jointes

• Copie de Test_V3.zip

  66.6 KB · Affichages: 21

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #22

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

NomsFeuilles = Array("BLV") ' ici mettre le nom des feuilles concernées
J'ai pourtant mis le nom feuille au pluriel

Si tu mets une seule feuille, tu n'auras les valeurs que d'une seule feuille
ici la feuille BLV.

Si tu veux toutes les feuilles, remplir NomsFeuilles avec le nom de toutes les feuilles.

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #23

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Oui je l'ai bien compris mais le fichier sera scinder selon les différents secteurs, je devrait donc répéter cette macro pour chaque établissement.

 

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #24

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Ma macro a été faite pour répondre à :

1) je souhaite pouvoir transférer les lignes de chaque factures vers la feuille de saisies pour ainsi la faire basculer dans l'onglet caisse.

Cliquez pour agrandir...

Maintenant si tu changes les conditions en cours de route, il faut une autre macro.

Quel est donc le problème alors avec le code que je t'ai proposé ?

Avec
.Cells(j, "B").Resize(, 11).Copy Sheets("SAISIE").Range("A65536").End(xlUp)(2)

Je récupère les commentaires

 

Dernière édition: 21 Octobre 2011

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #25

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Aucun problème la modification d'une nombre de colonne est bonne, j'aimerais juste savoir comment faire apparaitre mes facture soit en débit soit en crédit ?
De plus, est il possible de mettre en évidence les factures encore ouvertes.

Ps : ta macro est super et tu m'as beaucoup aidé et je t'en remercie

 

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #26

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Alors ????
Pourquoi avais-tu poster ce message ?

Ci joint ma pièce modifiée comme tu le remarquera, toutes les données ne sont pas transférer.

Cliquez pour agrandir...

Encore une fois

J'ai juste une dernière question afin d'alimenter un onglet débit ou crédit en fonction du signe sur la fiche de saisie comment faire ?

Cliquez pour agrandir...

Modifie ta pièce jointe de telle sorte que tes données exemples fassent appraitre ce "signe".
Ce qui n'est pas le cas actuellement.

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #27

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

J'ai posté ce message avant que tu m'expliques la signification du chiffre 5 dans ta macro

Concernant le champs débit et crédit je t'ai mis des opération en -.

Merci

 

Pièces jointes

• Copie de Test_V3 (2).zip

  66.5 KB · Affichages: 22

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #28

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Essaies cette macro modifiée pour le débit et crédit

Code:

Sub Transfert_BLV2()
Dim NomFeuilles, i As Byte, j As Long, a As Range
NomsFeuilles = Array("BLV") ' ici mettre le nom des feuilles concernées
For i = 0 To UBound(NomsFeuilles)
With Sheets(NomsFeuilles(i))
For j = 14 To 88
If Not .Cells(j, "C") Like "Code" Then
Set a = Sheets("SAISIE").Range("A65536").End(xlUp)(2)
.Cells(j, "B").Resize(, 11).Copy a
a.Offset(, (IIf(.Cells(j, "I") < 0, 10, 12))) = .Cells(j, "I")
Set a = Nothing
End If
Next j
End With
Next i
End Sub

Si tu as des questions concernant le code, n'hesites pas.

 

Vote positif 0 Vote négatif

T

Tiftouf

XLDnaute Nouveau

• 21 Octobre 2011

• #29

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Parfait franchement je te remercie beaucoup pour ton aide et ta patience ça marche nikel désolé si je n'ai pas toujours était très clair...

Encore merci

 

Vote positif 0 Vote négatif

T

TempusFugit

XLDnaute Impliqué

• 21 Octobre 2011

• #30

Re : Transfère de lignes via une macro sur une autre feuille de mon classeur

Bon courage pour lundi

En espérant que tu as compris ces quelques lignes de code VBA (car en cas de bug, faudra te débrouiller tout seul)

 

Vote positif 0 Vote négatif