Sujet: comment exporter sous excel les données du module histoire ?

[REIVILOR]

bonjour,

je souhaiterais exporter les données du module histoire, mais lorsque j'utilise la génération de requetes SQL avec la table REF_HISTOIRE, les données dans la colonne HI_TEXTE ne sont pas exploitable.
exemple ci dessous.

HI_ID	HI_DOSSIER	HI_DICORIGINE	HI_DATE_TEXTE	HI_DATE_DEBUT	HI_DATE_FIN	HI_CAT	HI_TITRE	HI_TEXTE	HI_IMAGE
437	0	GENE	vers 88			4	Les Romains édifient le limes	{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil MS Sans Serif;}{\f1\fnil\fcharset0 MS Sans Serif;}} \viewkind4\uc1\pard\lang1036\f0\fs16 Le limes \f1 d\'e9signe les fortifications romaines \'e9tablies aux fronti\'e8res entre l'empire romain et le "monde barbare" (peuples ne parlant ni grec, ni latin). \f0\par }

Pourriez vous ne dire comment récupérer l'information proprement ?
Merci
Olivier

[Bruno T.]

Bonjour, c'est le formatage de type RichText qui permet de configurer l'affichage avec couleurs ou autre.
Il existe peutêtre des convertisseur RichText  pour excel, sinon je peut forcer l'export en type PlainText où il n'yaura plus les caractères de formatage, mais juste le contenu du texte.

[catastrophe]

bonjour

avec un autre logiciel HEREDIS on peut exporter gedcom en tableau . et GENEATIQUE .
pour le module histoire , c'est quand même en GEDCOM ?

courage et bonne journée
any

[Bruno T.]

Si vous avez des notion de macro ou VBA vous copiez ce code dans un module de votre classeur Excel contenant l'export:

:

Function RtfInText(RtfText)
    With CreateObject("RICHTEXT.RichtextCtrl") ' or add reference to Microsoft Rich Textbox Control for early binding and With New RichTextLib.RichTextBox
        .SelStart = 0                          ' needs to be selected
        .textrtf = RtfText
        RtfInText = .Text
    End With
End Function
Voir l'image et l'exemple joint  (enlevez le .txt à la fin du nom de fichier)