Bonjour,
J’ai une macro simple qui copie une ligne vers d’autres lignes.
La macro fonctionne bien lorsque je l’execute manuellement, mais avec un bouton elle semble s’arrêter avant de faire la copie de la ligne sur les autres lignes…
Des idées ?
Macro (Main)
Bouton (Nouvelle Semaine)
AQTIS - Pour Regie3.ods
Bonjour
C’est en effet un bug que j’avais rapporté (voir fdo#70883) mais qui n’a pas été corrigé depuis… Il existe en effet des solutions de contournement mais qui sont moins “accessibles” aux débutants…
Tu peux remplacer par exemple ta procédure par :
Dim oDoc as Object, oRange as Object, aCopier as Object
oDoc = thisComponent
oRange = oDoc.Sheets.getByName("Par Semaine").getCellRangeByName("$B$145:$DZ$145")
oDoc.CurrentController.select(oRange)
aCopier = oDoc.CurrentController.getTransferable()
oRange = oDoc.Sheets.getByName("Par Semaine").getCellRangeByName("$B$5:$B$110")
oDoc.CurrentController.select(oRange)
oDoc.CurrentController.insertTransferable(aCopier)
J’avais créé cette page sur notre wiki pour présenter cette technique.
Cordialement
Merci beaucoup Pierre-Yves
J’en prends note et je corrige ma macro pour cette petite procedure.