Autres Copie de données (message d'erreur)

[AIXELS]

Bonjour à tous les Amis du Forum. 🙂
Je reviens vers vous pour vous demander de l'aide.
J'ai un fichier avec 2 feuilles. "VENTES", "CAISSE".
Ce fichier sert à comptabiliser les ventes pour une association
à but non lucratif qui permettra de préparer Noël.
"VENTES" sert à enregistrer chaque vente et "CAISSE" permet
de rendre la monnaie sans faire d'erreur.
Mon problème est le suivant :
Je rentre pour chaque achat effectué les quantités qui se cumulent
au fur et à mesure.
J'ai un message d'erreur pour la copie des données sur la feuille
"CAISSE". Un inputBox permet de saisir le paiement reçu et de calculer
la monnaie à rendre s'il y'a lieu.
Voir le fichier joint.

 

[vgendron]

bonjour

ActiveCell.Range("A1:G1").Select ???
ca ne veut rien dire ce truc.. et en fonction de là où est positionné ton curseur avant le lancement de la macro.. ca peut faire à peu près tout et n'importe quoi.. surtout n'importe quoi..

 

[vgendron]

ton fichier en retour

 

[AIXELS]

Bonjour @vgendron
Merci pour ton aide.
Ça fonctionne très bien.
Bien cordialement.

 

[AIXELS]

ton fichier en retour

ton fichier en retour

Bonjour à tous les Amis du Forum.
Je reviens vers vous une fois de plus.
Mon problèmes est le suivant :
J'ai développé une application en m'inspirant de programmes que j'ai trouvés.
Le but de cette application est le suivi de la vente et le rendu de monnaie lors
d'un tournoi de football organisé par une association à but non lucratif.

Les saisies et rendus de monnaie fonctionnent bien.
Mais si je veux réinitialiser les données : effacer les anciennes données
la saisie n'est plus prise en compte.
Je vous joints le fichier.
Merci pour votre aide.
bien cordialement.

 

[wDog66]

Bonjour à tous les Amis du Forum.
Je reviens vers vous une fois de plus.
Mon problèmes est le suivant :
J'ai développé une application en m'inspirant de programmes que j'ai trouvés.
Le but de cette application est le suivi de la vente et le rendu de monnaie lors
d'un tournoi de football organisé par une association à but non lucratif.

Les saisies et rendus de monnaie fonctionnent bien.
Mais si je veux réinitialiser les données : effacer les anciennes données
la saisie n'est plus prise en compte.
Je vous joints le fichier.
Merci pour votre aide.
bien cordialement.

Bonjour,
Pourquoi avori fait un doublon de ce fil https://excel-downloads.com/threads/probleme-lors-reinitialisation.20088261/
🙄 🤔

 

[mapomme]

Bonjour à tous😉,

ActiveCell.Range("A1:G1").Select ???
ca ne veut rien dire ce truc.. et en fonction de là où est positionné ton curseur avant le lancement de la macro.. ca peut faire à peu près tout et n'importe quoi.. surtout n'importe quoi..

Ce n'est pas tout à fait juste.
VBA sait très bien quoi faire de cette expression et ne fait pas n'importe quoi.
MonRange.Range("Plage") designe la zone débutant au coin supérieur gauche de MonRange et les coordonnées de Plage sont calculées à partir de cette nouvelle cellule origine.
En fait, on fait un changement d'origine. Pour cette expression, l'origine n'est pas la cellule A1 de la feuille mais la cellule origine est le coin supérieur gauche de MonRange à laquelle on applique la plage de coordonnées Plage.

On peut aussi voir cela comme la plage Range("Plage") de la feuille (origine A1 de la feuille) qu'on déplace par la translation (Cellule A1 => cellule coin supérieur gauche de MonRange).

C'est écrit quelque part dans la documentation Excel mais pas moyen de remettre la main dessus.

Le code suivant sélectionnera la zone D4:G10.

Sub test()
   Range("c3:d4").Range("b2:e8").Select
End Sub

nota : pratiquement, ça donne un code difficilement lisible mais tout est logique. Je crois bien ne l'avoir utilisé qu'une seule fois dans ma vie de VBAiste.

 

[TooFatBoy]

ça donne un code difficilement lisible mais tout est logique.

C'est vite dit... 😅

Range("c3:d4").Range("b2:e8").Select

Pour moi la logique serait d'écrire l'inverse :

Range("b2:e8").Range("c3:d4").Select

Bon week-end
🖖