Le 12/06/2010 11:01, xavier roguiez a écrit :
Bonjour
Merci pour votre test, je confirme, de l'éditeur cela fonctionne.
En revanche, le même appel de la fonction ne donne rien sur les
cellules du tableur...
Je pense que cela provient du contexte d'appel, mais mes infos
s'arrêtent là,
Le 12/06/2010 14:52, xavier roguiez a écrit :
Le 12/06/2010 13:28, christianwtd a écrit :
Le 12/06/2010 11:01, xavier roguiez a écrit :
Bonjour
Merci pour votre test, je confirme, de l'éditeur cela fonctionne.
En revanche, le même appel de la fonction ne donne rien sur les
cellules du
Le 12/06/2010 18:01, xavier roguiez a écrit :
Le 12/06/2010 17:37, Sharpminded Gmail a écrit :
Bonjour à tous,
bon courage !
Bonjour
Sans rentrer trop dans le détail technique de la fonction, je voulais :
- a partir de la cellule d'appel de la fonction : =Engins(2)
-
Bonjour à toutes et tous,
Je patine dans la choucroute (c'est pas un scoop) avec les cellules
fusionnées.
Je ne trouve pas de solution pour retourner les infos lignes et colonnes
de début et fin lorsque la cellule fusionnée est sélectionnée. Je n'ai
que les coordonnées de la première cellule,
Le 20/04/2010 19:24, Thierry Munoz a écrit :
Le 20/04/2010 14:57, christianwtd a écrit :
Bonjour à toutes et tous,
Je patine dans la choucroute (c'est pas un scoop) avec les cellules
fusionnées.
Je ne trouve pas de solution pour retourner les infos lignes et
colonnes de début et fin lorsque
Bonjour à toutes et tous,
J'ai réactualisé la macro Chiffres en lettres, pour OOo 3.x, Calc
Writer. Je me suis servi de Basic Addon Builder (excellent) et j'ai
maintenant un fichier oxt. Génial, par rapport aux versions 1 et 2 !
J'aimerai placer cette macro ici :
Bonjour à toutes et tous,
Je suis en train de migrer avec plaisir vers Ubuntu et je viens de
tomber sur un os. Voila :
Nouveau classeur, nouveau module, nouvelle boite de dialogue... bref,
tout neuf !
On modifie la taille de la boite de dialogue à la souris.
On sauvegarde le classeur.
A
Bernard Marcelly a écrit :
Bonjour,
Alors voici ma solution. ...
Aucune critique.
En revanche j'ai jeté un œil dans le code macro d'Antony Benoist. Je
trouve que OOoBasic se comporte curieusement :
Sur une instruction :
oFeuille.getCellByPosition(1, i).string = Time()
affiche l'heure.
zorglub.1er a écrit :
Merci cela marche ;0)
OK, c'est le principal.
Donc comment faire pour que les fonctions que je fabrique
soient visibles (avant de les utilisers) dans cette fenêtre
appelée Assistant Fonctions ?
Excellente question, merci de l'avoir posé ;-)
Ce qui veut dire en
zorglub.1er a écrit :
Bonjour,
Comment faire pour appeler (quand on en a besoin) une fonction
qu'on a faîte sous forme de macro à partir de Calc ?
Merci d'avance ;0)
Bonsoir,
Tu l'appelles avec le nom que tu as créé. Par
=MAFONCTION(A1; A2)
Pas causant ?
Autre exemple :
Function
pierre nowak a écrit :
Dans OOo Calc, j'ai une petite macro qui écrit qq chose dans la cellule
sélectionnée par l'utilisateur. J'aimerais ensuite déplacer la sélection sur la
cellule d'à côté pour y inscrire un autre message.
quelle instruction peut on utiliser en OOo basic pour cela ?
pierre nowak a écrit :
...
J'ai essayé ça :
Sub seconde()
monDoc=thisComponent
feuille=monDoc.Sheets.getByName(Feuil1)
cellule=monDoc.currentSelection
cellule.setString(2nd)
cellule.CharColor=RGB(0,200,0)
SelectRange=cellule.RangeAddress
Y=SelectRange.StartColumn + 1
Matthieu Marcillaud a crit:
Bonjour,
En important des donnes d'une base dans calc (2.0.4), il m'arrive
d'avoir des champs (adresse) comportant des retours la ligne.
Par exemple, je peux avoir en A1 :
"Toto
Nono
Lolo"
Si je mets dans une autre cellule la formule =
Matthieu Marcillaud a écrit :
christianwtd a écrit :
Sinon, pour ton problème, pas de solution pour l'instant. C'est un
bug signalé depuis longtemps. Les codes retour ligne sont remplacés
par des espaces.
Il y a un une adresse qui parle de ce bug justement, on peut voir
quelque part tous
Gregory a écrit :
Bonjour,
je cherche à récupérer le texte contenu dans une cellule afin de le comparer à
un mot. Le but est d'établir une condition qui lorsqu'elle est vérifiée,
entraine l'affichage automatique d'un mot dans une autre cellule. Je sais
comment faire afficher du texte dans une
Bernard Marcelly a écrit :
Bonjour amis programmeurs,
La version 5.2 française de Xray est maintenant disponible
Bernard Marcelly
Bonjour Bernard,
Je rectifie ton titre Bonjour amis programmeurs en Bonjour amis
programmeurs et amateurs ;-)
10 REM BASIC SANS API
20 CLS
30 FOR I
Francois Gatto a écrit :
Bonjour,
Mathias Michel a écrit :
Le 12/12/06, christianwtd[EMAIL PROTECTED] a écrit :
Mathias Michel a écrit :
Les formules (commençant par =) sont prévues pour retourner une
valeur
dans la cellule, pas pour modifier la mise en forme.
Oui, d'accord. Je ne
Francois Gatto a écrit :
...
Voici une function étoffée ... par ce temps d'hivers c'est mieux. ;)
Function rvb(sAddrCell As String,Optional iRvbFormat As Integer) As
String
End Function
Francois
Bonjour François,
Ben oui, excellent. Mais... ce que j'aurais souhaité est que l'on
Mathias Michel a écrit :
Les formules (commençant par =) sont prévues pour retourner une valeur
dans la cellule, pas pour modifier la mise en forme.
Mathias
Oui, d'accord. Je ne veux pas modifier une mise en forme, mais récupérer
les infos mise en forme de la cellule.
Bon surf,
Bonsoir à tous,
Je rebondis sur une question posée sur Users par Sophie : [Calc]
Recherche sur une couleur de cellule.
En Basic, CellBackColor semble parfaitement indiqué, mais pour si on
veux faire une fonction personnalisée, du genre :
=COULEUR_CELLULE(color)
il faut qu'on sache où est
Patrice DESTOUCHES a écrit :
Bonsoir,
Je cherche a récupérer le premier mot d'un texte se trouvant dans une cellule
calc.
J'ai réussi a récupérer le texte en entier de lafaçon suivante :
Curseur=UneCellule.createTextCursor
Curseur.gotoStart(false)
Curseur.gotoEnd(true)
mais la commande
Gérard Laloux a écrit :
Yeps,
J'aimerais pouvoir reprendre une discussion entamée sur users avec
Christian alias Christianwtd.
Macro destinée à supprimer des caractères accentués.
Merci Christian, cela correspond /pratiquement/ à ce dont j'ai besoin.
/++ Quelques questions dans le code que tu
Gérard Laloux a écrit :
...
Dernière petite question ... mais il n'y a aucune urgence (c'est
dimanche et ça va bientôt être l'heure de l'apéro ...).
Macro de l'après apéro :-)
Sub SupprimeAccents
Dim oDocument As Object, oSheet As Object
Dim Col As Integer, Lig As Integer
Bonjour à tous,
A partir des fonctions DATEDIF (non documentée) sous Excel et DATEDIFF
en Basic OpenOffice.org, j'ai essayé de concilier les avantages des
fonctions connues pour en faire une sous Calc, que j'appelle DATE_DIF.
Dans cette fonction, 3 unités sont possibles pour permettre de
Lionel Corgnet a écrit :
...
le Optional devant Param2 ?
Lionel, débutant en macros.
Bravo et merci. OPTIONAL et tout va mieux !
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
Bernard Marcelly a écrit :
DateDif existe comme fonction Basic. Elle est même documentée dans
l'aide en ligne. Alors on doit pouvoir en faire une fonction pour Calc.
Bonne journée
Bernard
Bonjour Bernard,
Exact et je ne l'avais pas vu. Pourtant quelque chose aurait dû me
mettre sur
Bonjour à tous,
Petite question : existe-t-il une fonction DATEDIF (différence entre
dates) dans les cartons d'OOo pour les prochaines versions ?
DATEDIF est une fonction non documentée Excel. Il faut donc chercher sur
le web les infos.
Bon surf,
Christian
--
Visitez
yves dutrieux a écrit :
..
Petite question : existe-t-il une fonction DATEDIF (différence entre
dates) dans les cartons d'OOo pour les prochaines versions ?
DATEDIF est une fonction non documentée Excel. Il faut donc chercher sur
le web les infos.
N'est-ce pas la fonction ANNEES, JOURS ou
Bonjour à tous,
Je viens de voir un truc qui me semble curieux avec FormulaLocal.
Regardez les 2 listings suivants, ils font la même chose mais
FormulaLocal est écrit différemment.
Listing 1 :
Sub FormulaTests
Dim oDocument As Object, oSheet As Object, oCell As Object
'
oDocument =
J'espère que les listings vont mieux passer.
Listing 1 :
Sub FormulaTests
Dim oDocument As Object, oSheet As Object, oCell As Object
'
oDocument = ThisComponent
oSheet=oDocument.Sheets.getByName(Feuille1)
For i =1 to 10
oCell = oSheet.getCellByPosition(0, i)
oCell.Value =
Manuel NAUDIN a écrit :
Bonjour,
est-ce que justement FormulaLocal ne désigne pas le nom 'localisé' de
la fonction ?
Cela serait donc normal.
Je crois bien que tu as raison.
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
Serge LE LOUARNE a écrit :
Bonsoir,
Sur une boite de dialogue, dans un frame control,j'affiche une série
d'image (un thème de la galerie, en fait). Si il y a peu d'image, ca
va, par contre j'aurais besoin de mettre un ascenseur vertical pour
les thèmes un peu fournis ...
J'ai cherché sur le
Laurent Godard a écrit :
je n'ai pas ce probleme
(meme si je m'attendais à l'avoir tant il est classique)
ooo 2.0.3
as tu typé ta variable avant ?
J'ai testé plusieurs cas, aucun valable. Mais j'en peut-être raté un.
Laurent
Je suis également avec OOo 2.03 (et Win XP)
Bon surf,
Christian
Fernand COSTA a écrit :
Re,
Dans ma macro, la partie décimale est gérée ici :
/début code
vIntermediaire=mid(vtravail,vpositionvirgule+1,vposition)
IF len(vIntermediairevposition) then
do while len(vIntermediaire)vposition
vIntermediaire=vIntermediaire+0
loop
END IF
Manuel NAUDIN a écrit :
Bonjour,
heu ...
sub Test
maVariable = 10
Moncalcul(MaVariable)
end Test
il me semble.
Bonsoir Manuel,
Il te semble bien. Je m'obstinais bêtement vers des erreurs de déclarations.
Encore merci,
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour
Bernard Marcelly a écrit :
.
On peut de même changer le curseur sur un contrôle de dialogue. C'est
un peu plus simple. Ici une routine appelée en cliquant un bouton du
dialogue:
Sub changerCurseur(evt as object)
dim kt as object, dlg as object, oWindow as object
kt = evt.Source
dlg =
jamila hafyd a écrit :
Bonjour liste
j'essaie de programmer un macro sous calc qui fait la comparaison entre
des prix et il me color la valeur minimale dans chaque ligne
Le code que j'ai écrit est le suivant
.
Généralement j'ai arrivé au resultat que je veux
Bonjour à tous,
Comment obtenir la version 1.1.x ou 2.0x avec une macro ?
Autre question, mais liée à la première, comment obtenir le nombre de
lignes max de Calc ?
D'avance, merci.
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
Didier Dorange-Pattoret a écrit :
Bonsoir,
Comment obtenir la version 1.1.x ou 2.0x avec une macro ?
Ici :
http://codesnippets.services.openoffice.org/Office/Office.Version.snip
Bonsoir Didier,
Merci pour cette info. Je vais enfin pouvoir finaliser ma macro chiffres
en lettres.
Bon
Tony GALMICHE a écrit :
... je t'avoue que cette liste je la
suis de très loin.
c'est pas bien :-)
Tu veux la mettre sur le site a coté de l'autre que tu as déjà fais sur
le même sujet ?
- http://fr.openoffice.org/Documentation/Outils/ChiffresLettres.sxc
Oui, je veux bien, mais avant
Bonjour à tous,
Mi-janvier j'ai présenté une macro qui semble ne pas trop intéresser. Je
me trompe ?
c'est une macro (une préversion en fait) qui permet la conversion de
valeurs financières de chiffres en texte en tenant compte des
particularités de différents pays (France, Canada,
Laurent Godard a écrit :
Bonjour Christian,
Premier obstacle. J'ai fait mes tests avec Win XP.
tu peux heureusement utiliser l'api de OOo pour t'en sortir
.
bonne chance
n'hesites pas si tu as des questions
Laurent
Bonjour Laurent,
Merci pour ton code qui me sort une épine
Bonsoir à tous,
Je vous présente une macro (une préversion en fait) qui permet la
conversion de valeurs financières de chiffres en texte en tenant compte
des particularités de différents pays (France, Canada, Belgique, Suisse,..)
A l'origine prévue pour Writer, j'ai essayé de l'améliorer pour
Bonjour à tous,
En fouillant dans mes archives je viens de retrouver une macro pour
transformer les chiffres en lettres. J'en profite pour l'améliorer avant
de vous la faire partager, mais j'ai des petits soucis.
La macro fonctionne avec Writer et Calc, mais le traitement est
différent, d'où
Laurent Godard a écrit :
Bonsoir christian
La macro fonctionne avec Writer et Calc, mais le traitement est
différent, d'où ma question : comment identifier l'application qui
appelle (Calc ou Writer) ?
regarde du cote de
thisComponent.supportsService(com.sun.star.text.TextDocument)
A Jovial et Mathias,
Avec beaucoup de retard, merci pour vos réponses.
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For
Bonjour à tous,
Questions:
Comment connaitre la cellule active (via une macro) ?
Dans le même ordre d'idée, comment connaitre une plage sélectionnée (si
elle existe) ?
D'avance merci,
Bon surf,
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
Laurent Godard a écrit :
Bonjour Christian,
Désolé, reponse rapide
...
As tu essayé
oButton.model.label = Toto
oButton.label = Tutu
voir le chapitre 16 page493 (V1)
Laurent
Bonjour Laurent,
Ah, qu'est-ce que c'est simple quand on sait ;-)
Il me semblait pourtant avoir déjà essayé, mais
Bonjour à tous,
Je cherche à faire des boutons dans un formulaire. L'idéal, enfin ce que
j'aurais aimé faire serait :
CommandButton(1)
CommandButton(2)
etc,...
mais ça marche pas, dommage.
François Gatto m'a donné un coup de main avec cette macro :
Sub theNiceButton
oDlg =
christianwtd a écrit :
Je redonne la macro en espérant qu'elle passe mieux:
Sub theNiceButton
oDlg = DialogLibraries.Standard.Dialog1
oDlgControl = CreateUnoDialog( oDlg )
for i% = 1 to n ' n = nbre de boutons de la série à gérer
oButton = oDlgControl.GetControl( CommandButton
jean-paul mesters a écrit :
Bonjour,
Je cherche à reproduire la boucle VBA suivante :
For Each Cell In Range(A1:A300)
ActiveSheet.Hyperlinks.Add Anchor:=Cell, Address:=D:\Images\ Cell.Value
.jpg, TextToDisplay:=Cell.Value
Next
Est-ce que quelqu'un a une idée, une piste.
A l'avance merci
Bonjour à tous,
Petite question :
Peut-on créer des contrôles, par exemple des boutons sous la forme de
tableau comme :
Bouton(1)
Bouton(2)
etc...
C'est possible à la création, mais si j'écris :
oDlg.Model.Bouton(1).Label = TEST
OOo n'est pas content
Est-ce possible ? Sinon, que faut-il faire
Gatto Francois a écrit :
Bonjour Christian,
On écrira alors quelque chose comme (pour exemple) :
Sub theNiceButton
oDlg = DialogLibraries.Standard.Dialog1
oDlgControl = CreateUnoDialog( oDlg )
for i% = 1 to n ' n = nbre de boutons de la série à gérer
christianwtd a écrit :
Gatto Francois a écrit :
Bonjour Christian,
On écrira alors quelque chose comme (pour exemple) :
Sub theNiceButton
oDlg = DialogLibraries.Standard.Dialog1
oDlgControl = CreateUnoDialog( oDlg )
for i% = 1 to n ' n = nbre de boutons de la série à
Arthur Agapoff a écrit :
Slt Christian,
Bon, j'ai fait des essais et j'ai trouvé comment utiliser les champs
masqués :
J'y suis arrivé grace à l'aide en ligne ;-)
En fait, c'est une zone de texte normale, sauf qu'on peut y appliquer
un masque, d'où le nom masqué
Dans Masque de saisie, tu
Arthur Agapoff a écrit :
Pour l'aide, il te suffit de placer ton champ masqué qqpart sur ta
feuille,
Clic droit sur le controle, option Controle ... pour accéder aux
options du champ
cliques dans la zone Masque de saisie puis Zoup , F1 te mène aux
explications.
Evidemment C'est que je
Véronique Stéphant a écrit :
Bonsoir,
Je commence tout juste à utiliser les macros calc... Les éléments de
programmation que je connais sont assez loin derrière moi, et ne sont
pas du langage utilisé par OO, même si il y a certaines ressemblances
quand même, et donc je suis toute novice
Sophie Gautier a écrit :
Bonjour à tous,
J'ai le plaisir de vous annoncer que Tony Galmiche va maintenant
co-leader le projet francophone avec moi.
Il assure cette tâche depuis déjà un moment puisqu'il intervient à
tous les niveaux du projet, y compris sur le site où je lui ai donné
les
Sophie Gautier a écrit :
Bonjour à tous,
J'ai le plaisir de vous annoncer ...
Sophie Gautier
Responsable du projet francophone
Membre du Community Council
Et dans le trio de tête on a :
SOOophie
LOOorent
TOOony
et maintenant au bOOolot ;-) en attendant un peu de repOOos
Bon COOourage :-)
Martin Desruisseaux a écrit :
Bonjour
[]
http://www.espace.ird.nc/sicade/addin-openoffice/fr/
Commentaires bienvenus. Si vous avec des questions ou des remarques,
je propose de les signaler sur cette liste dans un premier temps ? (ou
ailleurs si ça devient trop lourd ou trop
Francois Gatto (xhydrogene) a écrit :
Je cherche des exemples simples de diagramme créés par des macros. Je
ne trouve rien (j'ai peut-être mal cherché) dans ce domaine.
As tu regardé ici :
http://www.oooforum.org/forum/viewtopic.phtml?p=75067
François
Comme prévu, je patine sérieux.
Laurent Godard a écrit :
Bonjour Christian,
...
tu a sjuste sous OOoBasic (c'est magique) a utiliser en respectant la
casse
maConstanteNommee = com.sun.star.util.NumberFormat.DATE
pas besoin du getConstantByName , OOobasic connait toues les
constantes nommes de l'API
Laurent
Merci
Laurent Godard a écrit :
Re
makeRectangle -- tu as redefini cette fonction ?
Bon, c'est fait. J'avance péniblement. Maintenant je bute ici :
uno.invoke(oDoc, print, (Array(makePropertyValue( CopyCount, 2),
makePropertyValue( Pages, 1-4;10),)) )
J'ai trouvé cette fonction toute faite :
Francois Gatto (xhydrogene) a écrit :
christianwtd a écrit :
Je cherche des exemples simples de diagramme créés par des macros. Je
ne trouve rien (j'ai peut-être mal cherché) dans ce domaine.
As tu regardé ici :
http://www.oooforum.org/forum/viewtopic.phtml?p=75067
Espérant que cela te
Bonjour à tous,
Je cherche des exemples simples de diagramme créés par des macros. Je ne
trouve rien (j'ai peut-être mal cherché) dans ce domaine.
D'avance merci,
Bon surf
Christian
--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org
65 matches
Mail list logo