Le vendredi 9 octobre 2009, Michel Grentzinger a écrit :
> Bonjour,
>
> J'ai une zone nommée ("Liste des personnes") dont je veux copier le contenu
> (valeurs, format, texte : tout sauf les formules) vers une feuille vide.
>
> Comment faire pour copier sans les
Bonjour,
J'ai une zone nommée ("Liste des personnes") dont je veux copier le contenu
(valeurs, format, texte : tout sauf les formules) vers une feuille vide.
Comment faire pour copier sans les formules ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Av
barre qui
a juste besoin d'un délimiteur avant et après.
Comme ça je peux me passer de la macro, j'ai simplement à formatter ma chaine
(*numero*) avec la police "Code 3 de 9".
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://w
dire ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org
orer.Count - 1 To 0 Step -1
>
>
>
>
> Next x
>
> Et sauf cas particulier de traitement utilisant plusieurs éléments de la
> liste en même temps, tu es forcément sauvé.
Bonne astuce (non encore testée). J'ai utilisé la solution de Laurent pour
l'instant en pl
1 ? La valeur est-elle
remise à jour ? Comment surmonter cet obstacle ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
F
s davantage les fonction, je pense surtout à
celles définbissant le nombre de lignes/colonnes.
Je vais essayer de retrouver ma macro.
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
--
de l'application web sconet (base de données des élèves).
Ça peut être utile pour récupérer automatiquement les nom des élèves.
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Le mardi 8 juillet 2008, Michel Grentzinger a écrit :
> > > il s'agit de :
> > > oCellule.Value = dTempsCoureur
> > > oCellule.NumberFormat = nFormatId
> > > oCelluleHeure.Value = dHeureArrivee
> >
> > Pas reproduit chez moi (2.4.1 sous W
Document.unlockControllers
> voir également des possibilités via :
> oDocument.enableAutomaticCalculation(False)
> ou le verrouillage des controllers.
Déjà essayé ! Sans succès !
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
; nombre. Ou alors la modification de ces cellules déclenche de nombreux
> calculs en cascade, par exemple la mise à jour d'un graphique lié à ces
> cellules.
Non, ce n'est pas le cas.
Je vais refaire des tests avec OOo 3 !
Pour info ça prend entre 2 et 4 secondes !
--
Miche
x27;nTemps = oFormats.getStandardFormat(
com.sun.star.util.NumberFormat.TIME,
oLocale )
'oCellule.NumberFormat = nTemps
' On déplace la vue du classeur afin de visualiser la ligne du coureur
qui
arrive
> Est-ce possible ?
>
> Je pense que quelque chose comme :
> Minute( CDate(t) ) & "'" & Second( CDate(t) ) & "''"
>
> devrait correspondre à ce que tu souhaite.
Parfaitement ! Comme quoi, pas besoin de chercher compliqué.
affiché en HH:MM:SS.
Maintenant j'aimerai plutôt MM'SS'' comme format (comme dans Calc)... Est-ce
possible ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
For Ligne = LBound(vTableau) + 1 to Ubound(vTableau)
uneLigne = vTableau(Ligne)
sMessage = sMessage & uneLigne(3) & ". " & uneLigne(4)
& " " & uneLigne(5)
& " (" &
Facture(i, 5).
0 -> 1er élément
1 -> 2ème élément
...
5 -> 6ème élément.
Essaie avec :
dim iFacture(100, 6) as variant
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
--
l'ensemble des valeurs
avec des boucles ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [
:
Services supportés : createUnoService() pour y accéder
Services disponibles : createInstance() pour y accéder
> Tu rentres en Terra Incognita, n'oublie pas tes jumelles (Xray) et les
> cartes disponibles (Developer's Guide et IDL). Il faut aussi comprendre
> le langage
ces services ? Quelle différence y
a-t-il entre "GlobalSheetSettings" et "DocumentSettings" au niveau
utilisation ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
erci. J'avais prévu de tester ça
aujourd'hui en plus...
Est-ce que par hasard quelqu'un sait comment faire pour aller à la fin d'une
colonne ou d'une ligne ?
Je n'ai pas trouvé dans l'API (gotoEnd se rend à la dernière cellule remplie).
Faut-il passer par une a
vant de trouver ce qui n'allait pas car la sélection
se faisait uniquement dans le document Calc sans aucune référence au document
Writer, y compris la sélection "parasite".
Je me retrouvait avec
Menu.A7:J33,Feuille3.A7:J33
au lieu de
Feuille3.A7:J33
Est-ce un bog
;EDI, pas de soucis.
La seule solution que j'ai trouvée est d'ajouter un
oDocument.getCurrentController.Select(oUneFeuilleDuClasseur) juste après la
création du document Writer !
Le doc est ici (dernier bouton) :
http://www.cijoint.fr/cij21335935131432.ods
Est-ce un bogue ? D'où
seule cellule) dont le nom est basé sur le texte de la cellule d'en-tête.
Après il faut extraire sa position !
Je vais me lancer la dedans dans ces prochains jours !
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
s ou Draw). Si ce n'est pas
> trop urgent, je veux bien te donner un coup de main si tu choisis cette
> voie.
Je ne vois pas trop ce que ça peut donner... Sans compter que je connais
absolument pas XML.
> en espèrant que ça fasse avancer ton Schmilblick
Merci de
7;ai 8 feuilles de 50 x 8 lignes (le 50 peut varier et se monter à
120-130).
Ces feuilles sont générées selon un modèle de feuille (avant les courses) et
l'ordre des colonnes est défini dans ce modèle.
Mais plus j'avance, plus je me dis qu'une boucle Case sur la zone d'en
je crois), il est possible de créer une
variable ${$variable$colonne} qui se nommera ensuite
$contenudevariable$numerodecolonne.
Vu qu'avec OOBasic, ce n'est pas possible, je cherchais à pallier à cela... Il
dois bien y avoir une solution avec les tableaux ou les objets mais je
Mnemo() = colNum
> else
> ColNumForMnemo() = -1
> end if
>
> End Function
C'est une fonction qui permet de rechercher quelle est la colonne contenant
l'en-tête mais je souhaite éviter de devoir passer pa
-têtes
puisqu'il faut définir une variable contenant l'index de la colonne.
Merci !
Je vais déjà employer quelque chose qui s'approche de ta solution.
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
---
7;en-tête des colonnes (Rang, Nom, Prénom, Date) au
lieu du numéro...
Par exemple
sMessage = uneLigne(Colonne_Nom)
avec Colonne_Nom contenant le numéro de la colonne dont l'en-tête
contient "Nom".
Je sèche avec les tableaux... Quelqu'un peut-il me mettre sur la bo
le nom serait obtenu dynamiquement,
à l'exécution de la macro ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For add
m/sections/blogs/laurent_godard/2005_03_23_ooouno_slot
>s_for_the_2_0
Oui, j'étais déjà tombé sur cette page mais où peut-on se renseigner sur les
options ou arguments que peuvent prendre chaque commande ?
Le lien direct :
http://www.openoffice.org/files/documents/25/2570/commandsR
eur de macros (GoRight, GotoCell)
Je n'arrive pas à trouver quelque chose dans la doc de l'API...
Je voudrais en particulier étendre une sélection vers le bas (jusqu'à la
dernière ligne utilisée) à partir de 4 colonnes adjacentes déjà
sélectionnées.
--
Michel Grentzinger
ir la feuille sélectionée.
Petite astuce :
freezeAtPosition(0,6) fige la fenêtre à la 7ème ligne pour toutes les
colonnes...
Merci de ton aide.
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
vec Ubuntu et OOo 2.3, les lignes ne sont plus figées (le reste
est ok).
Avec ThisComponent.CurrentController.freezeAtPosition(7,2), ça ne fonctionne
pas... (p 327/328 de "Programmation OOo").
Comment faire ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
évènements du bouton
> EnleverUneSeconde : je pense que tu as deux évènements affectés, ou
> autres scories d'ancien codage qui ne sont pas supprimées.
Effectivement, c'était bien ça... Un ancien codage qui a du être conservé en
mémoire lorsque j'ai copier-coller les bouto
TempsAEnlever As Date
TempsAEnlever = TimeValue("00:01:00")
ModifierTemps(-TempsAEnlever)
End Sub
Sub EnleverUneSeconde()
Dim TempsAEnlever As Date
TempsAEnlever = TimeValue("00:00:01")
print -TempsAEnlever
ModifierTemps(-TempsAEnlever)
End Su
toutes les 1/2 heures environ.
Il faut saisir le numéro de dossard et le temps avec un seul PC
Avec le papier/crayon, ça le fait pas...
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
ce fichier est destiné à gérer
des cross d'établissements scolaires ! Au moins un pour commencer...
L'avantage d'utiliser OOo pour ça tient surtout au gain de temps : inutile de
resaisir les temps !
--
Michel Grentzinger
400Ko pour le document), lourd à charger. :((
Une simple soustration dans la macro élimine ce soucis. On conserve l'heure de
départ, et on calcule le temps par rapport à l'heure actuelle et on ne
conserve sur la feuille que la différence.
C'est la seule chose que j'ai réussi
(et je vais attendre d'autres
copies...) et je vous informe de la suite !
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
m'a pris plus de temps que
> je ne pensais, et a nécessité des connaissances qu'on peut récupérer
> dans le livre Programmation OpenOffice.org 2, pages 150, 326, 323, 86,
> 114, 321, 327.
Possédant le bouquin, je vais regarder ça de plus près ! Merci d'avoir indiqué
les pages...
--
Bonjour,
Calc peux-il faire office de chronomètre ?
Je souhaite gérer une course avec par exemple lorsque j'appuie sur une touche,
le temps écoulé depuis le départ s'inscrit dans une case et passe à la ligne
suivante.
Est-ce faisable "simplement" ? Je débute en
ERCHEV dans un tableau mais appliqué à une variable tableau de
tableau).
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Mon objectif caché est de proposer des classeurs réutilisables pour d'autres
collègues qui n'utilisent que Excel parce que les seules solutions existantes
sous sous Excel.
Si vous connaissez un exemple, je suis preneur.
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
algorithme... Quelqu'un a-t-il déjà fait quelque
chose s'y approchant ?
--
Michel Grentzinger
OpenPGP key ID : B2BAFAFA
Available on http://www.keyserver.net
-
To unsubscribe, e-mail: [EMAIL PROTE
Le lundi 7 mai 2007 16:15, Bernard Marcelly a écrit :
> Message de Michel Grentzinger date 2007-05-07 13:31 :
> > Bonjour,
> >
> > Je dispose d'un tableau sur une feuille définie et je souhaite
> > "mémoriser" ce tableau de cellules dans un tableau
barèmes
ZoneVitesse60m = FeuilleBaremes.getCellRangeByName("A6:C26")
Vitesse60m = ZoneVitesse60m.getDataArray
Dim Nombre As Double
Nombre = Vitesse60m(3, 10)
print Nombre
End Sub
--
Michel
tListener(ecouteur)
Remarque : c'est bien plus lent avec cette technique (1 seconde environ entre
la validation et l'apparition de la boite).
Mon problème était sans doute lié à la macro qui restait à l'écoute pendant
que je la modifiais et la relançais... Elle était donc lancée p
Le vendredi 4 mai 2007 20:28, Bernard Marcelly a écrit :
> Message de Michel Grentzinger date 2007-05-04 17:35 :
> > Bonjour,
> >
> >
> > Mon code fonctionne mais le message "Feuille modifiée !" ne disparait
> > qu'au bout de 7 ou 8 clics sur OK.
&g
t;)
Feuille.addModifyListener(ecouteur)
End Sub
Sub Relacher(ecouteur As Object)
Feuille.removeModifyListener(ecouteur)
End Sub
Sub perf_modified(ecouteur As Object)
print "Feuille modifiée !"
End Sub
Sub perf_disposing(ecouteur As Object)
print "Disposing
50 matches
Mail list logo