sauvegarder valeurs de cellule sous forme de colonne

lacarce · 20 Avril 2019

Bonjour nouveau sur ce forum je m'appelle claude lacarce utilisateur d'excel pour mes tableaux de compta et jeux je suis nul en VBA qui me semble souvent indispensable.
Mon problème actuel est dans le titre, je souhaite mémoriser sous forme de colonne les différentes valeurs que j’inscris manuellement dans une cellule ceci dans la meme feuille de calcul plusieurs cellules étant concerne par cette manip
Je doute pas que vous me proposiez une solution
merci

job75 · 20 Avril 2019

Bonjour lacarce, bienvenue sur XLD,

Voyez le fichier joint et cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim r As Range
Set r = [G2:L2] 'plage à adapter
Application.EnableEvents = False 'désactive les évènements
If FilterMode Then ShowAllData 'si la feuille est filtrée
For Each r In r
    If TypeName(Evaluate(r.Value)) = "Range" Then _
        If Not Intersect(Target, Range(r)) Is Nothing Then _
            Cells(Rows.Count, r.Column).End(xlUp)(2) = Range(r).Cells(1)
Next
Application.EnableEvents = True 'réactive les évènements
End Sub

Entrez des valeurs dans les cellules jaunes.

A+

lacarce · 20 Avril 2019

Merci, mais le fichier joint ne s’ouvre pas !

lacarce · 20 Avril 2019

Plus précisément le fichier n'est pas trouvé

Oops : nous avons rencontré des problèmes.

La page demandée n'a pu être trouvée.

job75 · 20 Avril 2019

Quelqu'un aurait-il l'obligeance de dire s'il rencontre un problème à l'ouverture du fichier ?

Hasco · 20 Avril 2019

Bonjour,

Pas de problème pour ouvrir ce classeur celui du post #2.
Par contre je crois que le "Ooops..." est un message d'erreur du serveur du forum.
@lacarce essayez de le retélécharger de nouveau.

Bon week-end

job75 · 20 Avril 2019

Bonjour Roblochon et merci.

Roblochon à dit:
Par contre je crois que le "Ooops..." est un message d'erreur du serveur du forum.

Ce serait bien curieux, jamais vu ça.

Edit : bonjour Patrick, merci à toi aussi.

Victor21 · 20 Avril 2019

Bonjour, Gérard.

job75 à dit:
Quelqu'un aurait-il l'obligeance de dire s'il rencontre un problème à l'ouverture du fichier ?

Aucun problème pour ouvrir ce fichier qui fonctionne parfaitement. Mais est-ce bien utile de le préciser ?

Victor21 · 20 Avril 2019

Bonsoir, lacarce.

lacarce à dit:
Plus précisément le fichier n'est pas trouvé
Oops : nous avons rencontré des problèmes.
La page demandée n'a pu être trouvée.

Rafraîchissez la page
et dites-nous

Staple1600 · 21 Avril 2019

Bonjour

Pour info
c'est bien le message par défaut généré par Xenforo quand il ne trouve pas une page
Lien supprimé

lacarce · 14 Mai 2019

Je reprends ce dossier aprés quelques jours d'absence et je vous remercie tous de votre contribution, d'autant plus que j'ai pu ouvrir ce fichier qui correspond exactement à ma demande et QUI MARCHE il ne me reste plus qu'à l'installer
Merci encore et cordialement

Sujet Résolu

Founette · 5 Juillet 2021

job75 à dit:
Bonjour lacarce, bienvenue sur XLD,

Voyez le fichier joint et cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

VB:

Private Sub Worksheet_Change(ByVal Target As Range) Dim r As Range Set r = [G2:L2] 'plage à adapter Application.EnableEvents = False 'désactive les évènements If FilterMode Then ShowAllData 'si la feuille est filtrée For Each r In r If TypeName(Evaluate(r.Value)) = "Range" Then _ If Not Intersect(Target, Range(r)) Is Nothing Then _ Cells(Rows.Count, r.Column).End(xlUp)(2) = Range(r).Cells(1) Next Application.EnableEvents = True 'réactive les évènements End Sub

Entrez des valeurs dans les cellules jaunes.

A+

Bonjour F,

Votre fichier m'interresse énormément.
je l'ai téléchargé pour utiliser la fonction mémorisation.
Malheureusement, je voulais lier votre case "mémoire" en jaune afin
d'avoir sa valeurs qui change automatiquement lors de l'insertion d'un montant dans
un autre onglet...je n'y arrive pas...vous pouvez m'aider?

Merci d'avance.

job75 · 5 Juillet 2021

Founette à dit:
Bonjour F,

F ??? Alors bonjour F , bienvenue sur XLD

En l'état ce n'est pas compréhensible, joignez votre fichier.

A+

Founette · 6 Juillet 2021

job75 à dit:
F ??? Alors bonjour F , bienvenue sur XLD

En l'état ce n'est pas compréhensible, joignez votre fichier.

A+

Bonjour Job75 ,

D'abord merci pour votre réponse rapide et votre acceuil.
En pièce jointe le fichier. (j'ai combiner ma création et votre fichier "Mémorisation".)

Dans l'onglet "ventes", il y a un total par produit.
J'aimerais qu'a chaque changements de quantités ce total soit mémorisé et ceci, à chaque changement de quantité de vente. Comme dans votre exemple Mémorisation (voir : onglet Mémoire).
Je désirerais que ce total par produit aille dans votre case jaune pour s'ajouter l'un après l'autre
en colonne B4,B6, etc de votre exemple.
Ceci par produit.
En fin de saisons, j'aimerais dans l'onglet "ventes totales" savoir quel produit est le plus vendu et
le total complet de ventes sur la saisons.

J'espère avoir été clair...

Merci d'avance pour votre aide.

Founette.

job75 · 6 Juillet 2021

Bonjour Founette,

Votre problème n'a qu'un lointain rapport avec le sujet de ce fil.

Créez une nouvelle discussion et profitez-en pour créer un fichier qui tienne la route.

Organisez votre tableau en base de données avec une ligne pour chaque vente.

Dans la colonne Produit vous utiliserez une liste de validation.

Il pourra être utile d'indique la date et l'heure de chaque vente.

Dans une 2ème feuille vous créerez un tableau récapitulatif des ventes.

A+

sauvegarder valeurs de cellule sous forme de colonne

lacarce

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Pièces jointes

lacarce

XLDnaute Nouveau

lacarce

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Hasco

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Victor21

XLDnaute Barbatruc

Victor21

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

lacarce

XLDnaute Nouveau

Founette

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Founette

XLDnaute Nouveau

Pièces jointes

job75

XLDnaute Barbatruc

Discussions similaires