Discussions et questions sur tout ce qui concerne la programmation tous langages et tous modules confondus.
Modérateur :Vilains modOOs
Règles du forum Balisage obligatoire dans cette section !
Aidez-nous à vous aider au mieux en balisant correctement votre question : reportez-vous sur les règles de cette section avant de poster !
Le Modérateur a écrit : Merci de respecter la syntaxe des balises : https://forum.openoffice.org/fr/forum/v ... 295#p27295 Le balisage doit être correctement orthographié (première lettre en majuscule puis le reste en minuscules), le tout entre crochets.
Bonsoir,
Dans une macro (adaptée de celle de Churay que je remercie au passage), je balaie toute la feuille et j'insère un saut de page à chaque fois que je rencontre un texte particulier dans la colonne "A".
Lorsque la macro se termine ma feuille s'affiche avec les sauts de page placés aux bons endroits.
Seulement sur la la feuille une colonne est sélectionnée (en bleu).
Je cherche (sans trouver) une solution pour faire disparaitre cette sélection au sein de la macro.
Bien sur il suffit de cliquer dans une cellule pour obtenir la disparition de la sélection mais j'aimerai pouvoir le faire par macro.
Merci de votre aide.
Ajout : Rectification, après avoir mieux observé le déroulement de mes macros (il y a plusieurs qui s'enchainent) il s'avère que problème survient lors d'un couper/coller special
Dernière modification par micmac le 20 juin 2015 22:01, modifié 5 fois.
Raison :Ajout de la coche verte
LibreOffice 6.2.7.1 (x64), Java (64b), Windows 10 (64b)
Ne croyez-vous pas qu'en joignant votre fichier ou/et votre code vous faciliteriez la tâche des volontaires qui vont se pencher sur votre question ?
Merci pour eux.
AOO 4.1.15 et LibO stable 7.6.6 / macOS Intel 13.6.6 Ventura
Adoptium-temurinJDK-jre_1.8.0_412 / Firefox/Safari/Thunderbird /Time Machine+cloneCCC Tutoriels du forum pour macOS Pour sauvegarder vos documents c'est ceinture ET bretelles
Sub Main
Dim oFeuille As Object, oCell As Object
oFeuille = ThisComponent.CurrentController.ActiveSheet
oCell = oFeuille.GetCellRangeByName("B6")
ThisComponent.CurrentController.Select(oCell)
End Sub
Cordialement
Luke
AOO 4.1.3 et LibO 5.3.7.2 Ubuntu 16.04 LTS et Debian 9 Xray ne tient pas lieu de tout, mais une pratique sans Xray ne vaut pas grand chose