

![]() | Start a set with this search |
![]() | Include this search in one of my sets |
![]() | Exclude this search from one of my sets |
![]() | Permalink to these results Paste this link in email or IM: |
| Atom feed for tracking future search results Paste this URL into your reader: |
7 messages in org.openoffice.fr.progRe: [prog] calc: insérer une note dan...| From | Sent On | Attachments |
|---|---|---|
| Pascal Duterme | Jan 26, 2006 8:29 pm | |
| Fr...@idkal.com | Jan 27, 2006 12:20 am | |
| Laurent Godard | Jan 27, 2006 12:43 am | |
| Fr...@idkal.com | Jan 27, 2006 12:56 am | |
| Pascal Duterme | Jan 27, 2006 1:44 am | |
| Fr...@idkal.com | Jan 27, 2006 1:49 am | |
| Laurent Godard | Jan 27, 2006 1:54 am |

![]() | Permalink for this message Paste this link in email or IM: |
![]() | Permalink for this thread Paste this link in email or IM: |
| Atom feed for this thread Paste this URL into your reader: |
| Subject: | Re: [prog] calc: insérer une note dans une cellule par un code | Actions... |
|---|---|---|
| From: | Pascal Duterme (p.du...@scarlet.be) | |
| Date: | Jan 27, 2006 1:44:30 am | |
| List: | org.openoffice.fr.prog | |
Merci beaucoup, c'est exactement ce que je recherchais.
Quelqu'un pourrait-il m'indiquer où je pourrais trouver la liste des
collections, des objets et de
leurs propriétés. Dans excel et vba de manière générale, il y a une aide
intuitive qui propose,
lorsqu'on commence à rédiger des codes des éléments. Ca n'a pas l'air de
fonctionner avec
openoffice. Et je n'ai pas encore trouver de documents complètes avec les
différents objets,
propriétés et leur description.
Vous aurez compris que je tente de me débarrasser au plus vite de l'utilisation
de ms office,
mais il faut que je réécrive toutes mes routines.
Send reply to: pr...@fr.openoffice.org Date sent: Fri, 27 Jan 2006 09:44:05 +0100 From: Laurent Godard <lgod...@indesko.com> To: pr...@fr.openoffice.org Subject: Re: [prog] calc: insérer une note dans une cellule par un code
Bonjour pascal
Je voudrais rédiger une petite macro qui permette d'insérer une note dans la cellule courante. Par exemple, je veux insérer de manière automatique un texte saisi par l'utilisateur à l'aide d'une boîte de dialogue "inputbox";
Contrairement à Writer, les Annotations sous calc ne sont pas des TextContent que l'on insere à partir d'un curseur (livre ed.1 p268 ou ed.2 p302 )
Pour Calc, il te faut te referer à la collection Annotations de la Feuille contenant ta cellule et l'inserer en donnant comme argument la cellule et le texte
Essaye donc ceci (testé avc une cellule selectionnée)
Sub Main
laCelluleActive = thisComponent.currentselection FeuilleContenante = laCelluleActive.spreadsheet lesAnnotations = FeuilleContenante.Annotations
leContenu = InputBox("Entrer le contenu de la note") laPosition = laCelluleActive.CellAddress
lesAnnotations.insertNew(laPosition,leContenu)
End Sub
Cordialement
Laurent
-- Laurent Godard <lgod...@indesko.com> - Ingénierie OpenOffice.org Indesko >> http://www.indesko.com Nuxeo CPS >> http://www.nuxeo.com - http://www.cps-project.org Livre "Programmation OpenOffice.org", Eyrolles 2004
-------------------------------------------------------- Pascal Duterme SCI-Projets Internationaux-Belgium rue Van Elewyck 35 B-1050 Bruxelles - Belgique tél : 32 2 649 07 38 fax : 32 2 646 87 92 e-mail : sc...@scibelgium.be site: www.scibelgium.be







