Exporter le contenu de DataReport en vb6

Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   -  
Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   - 31 mars 2021 à 16:02
Bonjour tout le monde

N.B : l'envirenement du travail est VB6

Voilà, j'exécute l'exportation du contenu du DataReport à l'aide de l'icone d'exportation sur la DataReport ( il y a deux icones une pour imprimer, l'autre pour exporter)
Le problème est que la photo déjà insérée sur la DataReport ne s'exporte pas.

Merci d'avance pour toute aide

5 réponses

Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 779
 
Bonjour,

Ce n'est possible qu'avec du VBA.

Macro à mettre dans le module de la feuille du TCD :
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
Dim d&, f&
Const p$ = "    Bien cordialement"
  
  f = Target.TableRange2.Row + Target.TableRange2.Rows.Count - 1
  d = Cells(Rows.Count, "A").End(xlUp).Row
  If d > f Then Cells(d, "A").Clear
  Cells(f + 2, "A").Value = p

End Sub


Note : On ne peut pas inhiber le message " Voulez-vous remplacer le contenu ..." lorsque la mise à jour du TCD écrase le texte situé en dessous, le plus simple est d'accepter.
Il serait possible d'inhiber tous les messages d'alerte sur cette feuille mais c'est risqué :ça masquerait aussi toutes les autres alertes (comme par exemple lors de la suppression de la feuille).

1
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 779
 
OUPS !!!

Sorry, je me suis trompé de post pour répondre.
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour a vous deux,

Lenouveauapprenti
Exporter vers quoi?

Ca vous dit kake chose:

https://forums.commentcamarche.sitesdebloques.org/forum/affich-36633407-enregistrer-le-contenu-de-datareport-en-tant-que-pdf
0
Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   2
 
Bonjour f89009,

C'était un problème que je n'ai pas pu le résoudre jusqu'à maintenant.
Certes je suis encore dans la phase préhistorique de la programmation, et entrain d'apprendre encore, je vous repose bêtement encore ma question, comment pourrai je exporter l'image insérée déjà dans le DataReport (vb6) si la tentative est possible ?

Merci d'avance
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,
Vous n'avez pas repondu a la question: exporter vers quoi?
0
Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   2 > f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention  
 
Rebonjour

Sincérement je ne sais pas quelle extension est possible puisque l'image est incompatible avec .txt.
L'idée est de pouvoir exporter la carte de travail avec photo vers le bureau , puis après la charger dans une clé usb pour la faire imprimer sur un autre poste muni d'imprimante couleur.
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713 > Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention  
 
Re,
Ce projet est pour une autre personne que vous?
Il me faudrait votre projet car je ne peux rien faire.
0
Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   2 > f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention  
 
Re

C'est mon projet, je l'ai installé pour mon frère qui gère une petite ferme.
Pas de problème pour vous le transmettre. Rappelez moi la procédure, car ça faisait longtemps que je vous ai transférerun pseudo essai sans résultat.
Merci d'avance
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713 > Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Il faut le dossier complet de votre projet. faites un .zip ou ;rar
0
f894009 Messages postés 17268 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Avec winzip ou 7zip, gratuit télécharger le.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Lenouveauapprenti Messages postés 306 Date d'inscription   Statut Membre Dernière intervention   2
 
Bonjour

S'il vous plait, expliquez moi la procédure de vous envoyer mon projet via 7zip

Merci
0