Bonsoir,
Pourquoi ne pas supprimer simplement la feuille, puis la recréer ?
Exemple :
sub NewSheet
dim oSheets as object
oSheets = thisComponent.getSheets()
if oSheets.hasByName("Comptes") then
oSheets.removeByName("Comptes")
end if
if Not oSheets.hasByName("Comptes") then
oSheets.insertNewByName("Comptes",2)
end if
end sub
Si tu souhaites rester avec l'enregistreur de macros, tu devrais plutôt
sélectionner un range.
Bernard Siaud alias Troumad a écrit :
Bonjour
Je viens de faire à nouveau le test avant d'en parler ici et j'ai en
plus généré un rapport de bug...
Bon ça ne marche pas quoi !
Sur mon fichier http://troumad.org/Linux/scrabble.ods , quand je clique
sur la touche [Efface tout], j'ai l'impression qu'elle est appelée une
infinité de fois. Je ne peux pas dire pourquoi !
Le pire, est quand j'ai une erreur de syntaxe sur le programme, j'ai la
fenêtre d'erreur qui arrive sans arrêt, même après la réparation de
l'erreur dans le code et le message que la procédure va donc s'arrêter
suite à cette modification du code.