OVH Cloud OVH Cloud

Prob. report

6 réponses
Avatar
TOM
Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers. Chaque
jour le solde du jour précédent étant reporté. Quelle macro pourrait me
permettre de réinitialiser le feuille chaque semaine : la vider et surtout
(ce que je n'arrive pas à faire...) reporter le solde de la semaine
précédente.

Par avance merci.

Tom

6 réponses

Avatar
Patrick Bastard
Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine : la
vider et surtout (ce que je n'arrive pas à faire...) reporter le
solde de la semaine précédente.

Par avance merci.

Tom


Avatar
TOM
Merci pour ta réponse. C'est tout à fait ce que je recherche.
J' ai, cependant, un soucis dans l'enregistrement de ta macro.(sûrement dû à
mon inexpérience dans le VB)
Au niveau de :úlse, Transpose.... il m'indique une erreur de compilation
et me demande de définir une variable.

Cordialement.




Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== > P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine : la
vider et surtout (ce que je n'arrive pas à faire...) reporter le
solde de la semaine précédente.

Par avance merci.

Tom







Avatar
Patrick Bastard
Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :


Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,SkipBlanks
:úlse, Transpose:úlse
sur une seule ligne.

Mais essaie plutôt l'enregistreur directement :
Outils, Macros, Nouvelle macro,
puis
copier l'ancien solde, collage spécial - valeur- à la place du nouveau
solde, sélectionner la plage contenant les dates, libellés, débits, crédits,
effacer,
cliquer sur le bouton d'arrêt de l'enregistreur (carré)
alt.F11 pour accéder à VBA, double cliquer dans le module ainsi créé, et
regarder le code.

Et dis nous.


--
Bien cordialement,
==================================== P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net



Merci pour ta réponse. C'est tout à fait ce que je recherche.
J' ai, cependant, un soucis dans l'enregistrement de ta
macro.(sûrement dû à mon inexpérience dans le VB)
Au niveau de :úlse, Transpose.... il m'indique une erreur de
compilation et me demande de définir une variable.

Cordialement.




Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de
message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== >> P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine :
la vider et surtout (ce que je n'arrive pas à faire...) reporter le
solde de la semaine précédente.

Par avance merci.

Tom






Avatar
TOM
Bonsoir,
Après utilisation de l'enregistreur : les données sont effacées, l'ancien
solde est à zéro (parfait)
mais dans la cellule "Nouveau_solde" figure :" #REF!" ?? et l'ancien solde
n'est pas reporté.

???





Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :


Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,SkipBlanks
:úlse, Transpose:úlse
sur une seule ligne.

Mais essaie plutôt l'enregistreur directement :
Outils, Macros, Nouvelle macro,
puis
copier l'ancien solde, collage spécial - valeur- à la place du nouveau
solde, sélectionner la plage contenant les dates, libellés, débits,
crédits,

effacer,
cliquer sur le bouton d'arrêt de l'enregistreur (carré)
alt.F11 pour accéder à VBA, double cliquer dans le module ainsi créé, et
regarder le code.

Et dis nous.


--
Bien cordialement,
==================================== > P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net



Merci pour ta réponse. C'est tout à fait ce que je recherche.
J' ai, cependant, un soucis dans l'enregistrement de ta
macro.(sûrement dû à mon inexpérience dans le VB)
Au niveau de :úlse, Transpose.... il m'indique une erreur de
compilation et me demande de définir une variable.

Cordialement.




Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de
message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== > >> P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine :
la vider et surtout (ce que je n'arrive pas à faire...) reporter le
solde de la semaine précédente.

Par avance merci.

Tom











Avatar
TOM
Bonsoir,
Merci beaucoup pour ton aide.Après de légères modifications de tes
propositions
tout fonctionne à merveille.

Très cordialement.






Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,SkipBlanks
:úlse, Transpose:úlse
sur une seule ligne.

Mais essaie plutôt l'enregistreur directement :
Outils, Macros, Nouvelle macro,
puis
copier l'ancien solde, collage spécial - valeur- à la place du nouveau
solde, sélectionner la plage contenant les dates, libellés, débits,
crédits,

effacer,
cliquer sur le bouton d'arrêt de l'enregistreur (carré)
alt.F11 pour accéder à VBA, double cliquer dans le module ainsi créé, et
regarder le code.

Et dis nous.


--
Bien cordialement,
==================================== > P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net



Merci pour ta réponse. C'est tout à fait ce que je recherche.
J' ai, cependant, un soucis dans l'enregistrement de ta
macro.(sûrement dû à mon inexpérience dans le VB)
Au niveau de :úlse, Transpose.... il m'indique une erreur de
compilation et me demande de définir une variable.

Cordialement.




Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de
message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== > >> P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine :
la vider et surtout (ce que je n'arrive pas à faire...) reporter le
solde de la semaine précédente.

Par avance merci.

Tom











Avatar
Patrick Bastard
Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :

Heureux de t'avoir été utile,


--
Bien cordialement,
==================================== P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonsoir,
Merci beaucoup pour ton aide.Après de légères modifications de tes
propositions
tout fonctionne à merveille.

Très cordialement.






Selection.PasteSpecial Paste:=xlPasteValues,
Operation:=xlNone,SkipBlanks :úlse, Transpose:úlse
sur une seule ligne.

Mais essaie plutôt l'enregistreur directement :
Outils, Macros, Nouvelle macro,
puis
copier l'ancien solde, collage spécial - valeur- à la place du
nouveau solde, sélectionner la plage contenant les dates, libellés,
débits, crédits, effacer,
cliquer sur le bouton d'arrêt de l'enregistreur (carré)
alt.F11 pour accéder à VBA, double cliquer dans le module ainsi
créé, et regarder le code.

Et dis nous.


--
Bien cordialement,
==================================== >> P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net



Merci pour ta réponse. C'est tout à fait ce que je recherche.
J' ai, cependant, un soucis dans l'enregistrement de ta
macro.(sûrement dû à mon inexpérience dans le VB)
Au niveau de :úlse, Transpose.... il m'indique une erreur de
compilation et me demande de définir une variable.

Cordialement.




Bonjour à toi aussi, *TOM*.
*Pour reprendre les termes de ton intervention* -voir en fin de
message :


Tu nommes les cellules contenant l'ancien et le nouveau solde.
Les dates à partir de A4
Les libellés à partir de B4,
Les débits à partir de C4,
les crédits à partir de D4,
Le solde en D18
Ta plage de saisie de A4 à D18

L'enregistreur de macro donne ceci :
Sub Macro1()
'
' Macro1 Macro
'
Application.Goto Reference:="Nouveau_solde"
Selection.Copy
Application.Goto Reference:="ancien_solde"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:úlse, Transpose:úlse
Range("A4:D18").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub

A adapter en fonction de la structure de ta feuille.

Reviens nous dire.

--
Bien cordialement,
==================================== >>>> P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Bonjour,

Soit une feuille qui me permet de suivre des comptes journaliers.
Chaque jour le solde du jour précédent étant reporté. Quelle macro
pourrait me permettre de réinitialiser le feuille chaque semaine :
la vider et surtout (ce que je n'arrive pas à faire...) reporter
le solde de la semaine précédente.

Par avance merci.

Tom