Re: [fr-users]

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 !

Le mar. 30 oct. 2018 à 23:07, Thierry Jeanneret <thierry.jeanneret@gmail.com>
a écrit :

> 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.
>
>
>
> Le mar. 30 oct. 2018 à 23:04, Philippe BLANCHARD <
> phillibreoffice@gmail.com> a écrit :
>
> > Bonsoir,
> > Est il possible de remettre les paramètres par défaut ?
> > Si oui, connaissez vous le chemin d'accès ?
> > Merci par avance
> >
> > Le mar. 30 oct. 2018 à 23:01, Thierry Jeanneret <
> > thierry.jeanneret@gmail.com> a écrit :
> >
> > > 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
> > >
> > >
> > > Le mar. 30 oct. 2018 à 22:59, Philippe BLANCHARD <
> > > phillibreoffice@gmail.com> a écrit :
> > >
> > > > 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
> > > >
> > > > --
> > > > Envoyez un mail à users+unsubscribe@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

-- 
Envoyez un mail à users+unsubscribe@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