Bonjour, voici un exemple ci-joint qui peut peut-être t'aider, je modifie le range du graphique. https://cjoint.com/c/KHpjYiJvu7S
Yves Le sam. 14 août 2021 à 12:23, yves dutrieux <ydutri...@gmail.com> a écrit : > Bonjour, > > si c'est le problème de selection, voici un bout de code pour récupérer ce > qu'il faut d'une selection en calc : > Dim doc As object, feuille As object, ctrl as object , cel As Object > dim formulaires as Object, monformulaire as object, mapage as object, > moncontrol as object, monimage as object > dim chemin as string > dim positionImage as New com.sun.star.awt.Point > Dim Taille As New com.sun.star.awt.Size > dim sel as object > 'dim departcol, departlig, finlig, fincol as Object > > ' recuperation des infos de la feuille actuelle > doc=thisComponent > Ctrl=doc.CurrentController > feuille=Ctrl.ActiveSheet > > 'recuperation de la selection en cours... > sel=doc.currentselection > if sel.supportsService("com.sun.star.sheet.SheetCellsRanges") then > ' differentes zones selectionnées (on traite pas ici) > ' for x = 0 to sel.count - 1 > ' zonex = sel(x) > ' msgbox("Zone n" & x & "=" & adrZoneString(doc,zonex.RangeAddress)) > ' next > exit sub > elseif sel.supportsService("com.sun.star.table.Cell") then > ' une cellule selectionnee > DepartCol=sel.CellAddress.column > FinCol=sel.CellAddress.column > DepartLig= sel.CellAddress.row > FinLig= sel.CellAddress.row > elseif sel.supportsService("com.sun.star.table.CellRange") then > ' une zone adjacente de cellule selectionnee > DepartCol=sel.rangeAddress.startcolumn > DepartLig=sel.rangeAddress.startrow > FinCol=sel.rangeAddress.endcolumn > FinLig=sel.rangeAddress.endrow > else > msgbox("erreur logicielle") > exit sub > end if > > sinon, si tu as la possibilité dans ton graphe, c'est de toujours faire > tes ajouts de lignes AVANT la dernière ligne de ta sélection. Ainsi ton > graphique se mettre à jour SANS que tu aies à le modifier ;) > > Yves > > Le ven. 13 août 2021 à 23:25, Algol formations < > algol.formati...@inforbur.com> a écrit : > >> Le 13/08/2021 à 21:29, Michel Rudelle - Listes LibO a écrit : >> > Bonsoir Michel, >> > >> > Le 13/08/2021 à 17:51, Algol formations a écrit : >> >> Bonjour, >> >> >> >> Je galère sur une macro qui compte le nombre de cellules rajoutées >> >> dans une sélection de données pour mettre à jour un graphique calc. >> > Tu galères à quel niveau ? Pour découvrir les nouvelles cellules, pour >> > les compter, pour mettre à jour le graphique... Éventuellement un bout >> > de macro permettrait de savoir où tu bloques. >> >> >> >> Merci de votre aide si possible (il s'agit de l'automatisation d'une >> >> application calc) >> >> >> >> A+ >> >> >> Hello Michel, >> >> Binnnnnnnnnnnnn !! c'est dès le début que je bloque ! >> Récupération des données d'origine : plage = oChart.getRanges(), OK. >> Trouver la dernière cellule non vide de la zone : pas top (avec >> createSearchDescriptor et findAll ?...). >> Ensuite je sèche lamentablement sur: reconstituer la nouvelle référence >> (plage) pour mettre à jour à l'aide de oChart.setRanges(plage). >> >> En résumé ... Je rame ! >> >> A+ >> >> >> >> -- >> Michel Blanchard >> ALGOL - Formation - Coaching Bureautique >> /5 rue de Vélantan/ >> *37130* Mazières de Touraine >> >> -- >> Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous >> désinscrire >> Les archives de la liste sont disponibles à >> https://listarchives.libreoffice.org/fr/users/ >> Privacy Policy: https://www.documentfoundation.org/privacy >> > > > -- > web site : http://www.molenbaix.com > -- web site : http://www.molenbaix.com -- Envoyez un mail à users+unsubscr...@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy