IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

OpenOffice & LibreOffice Discussion :

Macro dernière cellule modifiée [LibreOffice][Tableur]


Sujet :

OpenOffice & LibreOffice

  1. #1
    Candidat au Club
    Homme Profil pro
    Formateur en informatique
    Inscrit en
    Août 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Aisne (Picardie)

    Informations professionnelles :
    Activité : Formateur en informatique

    Informations forums :
    Inscription : Août 2015
    Messages : 4
    Points : 2
    Points
    2
    Par défaut Macro dernière cellule modifiée
    Bonjour,

    Après avoir beaucoup cherché, je crois que mon besoin est trop spécifique (ou ma compétence en macros dans Calc trop faible ) et je viens faire appel aux experts de ce forum.

    Je voudrais qu'une cellule de la feuille active (disons A1) contienne la valeur de la dernière cellule qui a été modifiée. Est-ce possible ?

    (LibreOffice 4.3)

    Merci pour votre aide !

  2. #2
    Rédacteur

    Avatar de zoom61
    Homme Profil pro
    ...
    Inscrit en
    Janvier 2005
    Messages
    9 429
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Vienne (Limousin)

    Informations professionnelles :
    Activité : ...
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2005
    Messages : 9 429
    Points : 58 609
    Points
    58 609
    Billets dans le blog
    11
    Par défaut
    Salut,

    Avec quelque chose comme cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Sub test()
     
    Dim monDocument As Object, lesFeuilles As Object
    Dim maFeuille As Object, maCellule As Object
     
    monDocument = ThisComponent
    lesFeuilles = monDocument.Sheets
    maFeuille =  lesFeuilles.getByName(ThisComponent.CurrentController.ActiveSheet.Name)
     
    maCellule = monDocument.CurrentSelection
    ValCel = maCellule.String
     
    maCellule = maFeuille.getCellRangeByName("A1")
    maCellule.String = ValCel
     
    End Sub
    Ensuite, sur la feuille dans l'événement de la feuille, il faut affecter la macro à l'événement "Sélection modifiée".

    N'oubliez pas le Tag afin de faciliter la recherche, et en votant cela permet de mieux la cibler.

    Je ne réponds pas aux messages privés s'ils sont liés à une question technique

  3. #3
    Candidat au Club
    Homme Profil pro
    Formateur en informatique
    Inscrit en
    Août 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Aisne (Picardie)

    Informations professionnelles :
    Activité : Formateur en informatique

    Informations forums :
    Inscription : Août 2015
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    Déjà une réponse, trop cool merci !

    As-tu testé ce que tu proposes ? Car moi j'ai testé et ça ne marche pas

    L'interpréteur basic s'arrête sur :

    ValCel = maCellule.String

    avec le message "Property or method not found : string"

    Bizzare hein ?

    Merci en tout cas

  4. #4
    Rédacteur

    Avatar de zoom61
    Homme Profil pro
    ...
    Inscrit en
    Janvier 2005
    Messages
    9 429
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Vienne (Limousin)

    Informations professionnelles :
    Activité : ...
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2005
    Messages : 9 429
    Points : 58 609
    Points
    58 609
    Billets dans le blog
    11
    Par défaut
    Il faut juste définir la variable Dim ValCel As String.
    N'oubliez pas le Tag afin de faciliter la recherche, et en votant cela permet de mieux la cibler.

    Je ne réponds pas aux messages privés s'ils sont liés à une question technique

  5. #5
    Candidat au Club
    Homme Profil pro
    Formateur en informatique
    Inscrit en
    Août 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Aisne (Picardie)

    Informations professionnelles :
    Activité : Formateur en informatique

    Informations forums :
    Inscription : Août 2015
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    Effectivement c'était juste une déclaration de variable à mettre.

    Ça fonctionne du coup merci !

    Puis-je profiter de tes compétences avec une dernière question ?

    Pour écrire en A1 non pas la valeur de la cellule qui a été modifiée, mais la valeur de la cellule qui est à côté de celle qui a été modifiée.

    Peux-tu me montrer comment faire ? Peut importe le côté, ensuite j'adapterais. Je suppose que c'est maCellule = monDocument.CurrentSelection qui va changer.

    Merci encore

  6. #6
    Rédacteur

    Avatar de zoom61
    Homme Profil pro
    ...
    Inscrit en
    Janvier 2005
    Messages
    9 429
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Vienne (Limousin)

    Informations professionnelles :
    Activité : ...
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2005
    Messages : 9 429
    Points : 58 609
    Points
    58 609
    Billets dans le blog
    11
    Par défaut
    Tu trouveras tous les éléments nécessaires dans ce tutoriel : Utiliser oBasic dans le Tableur (Calc)
    N'oubliez pas le Tag afin de faciliter la recherche, et en votant cela permet de mieux la cibler.

    Je ne réponds pas aux messages privés s'ils sont liés à une question technique

  7. #7
    Candidat au Club
    Homme Profil pro
    Formateur en informatique
    Inscrit en
    Août 2015
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Aisne (Picardie)

    Informations professionnelles :
    Activité : Formateur en informatique

    Informations forums :
    Inscription : Août 2015
    Messages : 4
    Points : 2
    Points
    2
    Par défaut
    zoom61,

    J'ai pu adapter le code pour répondre précisément à mon besoin.

    Merci pour ton aide précieuse.

    A bientôt,

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Comment identifier la dernière cellule modifiée
    Par Tho69 dans le forum Macros et VBA Excel
    Réponses: 22
    Dernier message: 29/09/2021, 14h37
  2. [XL-2010] macro sélectionne cellule modifiée (rester sur même cellule)
    Par arthour973 dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 17/05/2015, 20h29
  3. Modifier l' adresse de la dernière cellule
    Par jp014 dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 16/03/2011, 13h39
  4. Réponses: 1
    Dernier message: 26/05/2007, 16h20
  5. [VBA-E] Repérer la dernière cellule modifiée
    Par aokiseiichiro dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 16/05/2006, 16h45

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo