(no subject)

fr-users
#1

Bonjour à tous,

Je débute avec les macros sous LibreOffice,

Voilà mon code :
REM ***** BASIC *****

Sub Trait
Rem Déclaraton Variables & Tableau
Dim oSheet As Object
Dim oCell As Object
Dim Equipe1 As String Rem Equipe qui reçoit
Dim Equipe2 As String Rem Equipe Visiteur
Dim ScoreEq1 As Integer Rem Score de l'Equipe1
Dim ScoreEq2 As Integer Rem Score de l'Equipe2
Dim MaChaine As String
Dim Tab_Journee(13,22) As Variant

oSheet = ThisComponent.Sheets.getByName("1")

For Rang = 1 to 7
Equipe1 = oSheet.getCellByPosition(1,3+Rang*2).String
MsgBox(Equipe1)
ScoreEq = oSheet.getCellByPosition(3,3+Rang*2).String
MsgBox(ScoreEq1)
Next Rang

End Sub

Tout fonctionnait et ce soir à l'éxécution, j"ai le message suivant :

Pour des raisons de sécurité, il est impossible d'exécuter cette macro.
Pour plus d'informations, vérifiez les paramètres de sécurité.

Qu'ai je fait ?
Pouvez vous m'aider ?

Merci par avance de votre aide.

Amicalement

Philippe

#2

Bonsoir,

Vous avez dû modifier les paramètres généraux de LibreOffice. C'est la
qu'on spécifie le niveau de protection des macros.

Thierry

#3

Bonsoir,
Est il possible de remettre les paramètres par défaut ?
Si oui, connaissez vous le chemin d'accès ?
Merci par avance

#4

Je suis sur mon iPad, je n'ai donc pas le menu sous les yeux. C'est dans
Préférences, sous sécurité je crois, ensuite vous avez trois options pour
les macros : Tout bloquer, c'est votre cas, prévenir avant exécution, qui
est agréable, ou accepter les macros provenant d'endroits connus, qui peut
être une bonne solution aussi.

#5

Je suis certain de ne pas avoir modifier ce paramètre !
Malgré tout, je viens de mettre le niveau le plus faible (pas recommandé)
mais j'ai toujours le même message !

#6

Bonsoir,

J'essaierais en 2 temps :
Redémarrage de la bécane, test. Si toujours pareil :
Suppression du profil
En "bidouillant" avec basic, comme par exemple une tentative de modification alors que le programme est bloqué sur un point d'arrêt, ça m'est arrivé de provoquer des effets indésirables.
Bon courage et...
bon surf,
Christian