Résultats de la recherche

  1. S

    vba rechercher puis couper coller

    c'est des acquisitions intra communautaire ou des importations... PierreJean, Merci pour le ptit code, ça va bien me dépatouiller !! a++
  2. S

    vba rechercher puis couper coller

    bonjour, j'ai une feuille excel qui est le résultat d'une requête SQL avec 2 fournisseurs distinct pour chaque facture (une histoire de tva) et même parfois plusieurs mandats pour une même ref facture. je vous joint un extrait de ce fichier pour une meilleure compréhension. il faudrait, pour...
  3. S

    Vba userform & oracle

    Re : Vba userform & oracle Salut, j'ai finalement réussi en utilisant l'enregistreur de macro. Private Sub OK_Click() Dim Ncde As String Ncde = TextBox1.Value ActiveSheet.Cells.ClearContents With ActiveSheet.ListObjects.Add(SourceType:=0, Source:= _...
  4. S

    Vba userform & oracle

    Re : Vba userform & oracle Uuuppppeee
  5. S

    Vba userform & oracle

    Bonjour, j'ai un soucis concernant la connection a une BDD Oracle via VBA. Voici mon code : Private Sub CommandButton1_Click() Dim strConnection As String Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim strSQL As String Dim Ncde As String Set conn = New...
  6. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA Je met en PJ le fichier. Les fichiers de connection que me créé excel sont des .odc :confused: je précise que j'interroge un serveur oracle. le but serai de récupérer le String du user form quand on clique ok et de l'intégrer dans la requete sql. Ensuite...
  7. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA UP !! J'ai vraiment besoin d'un coup de main ! Merci
  8. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA Re j'ai un fichier de connection en odc, avec ce code il me dit que le format de base de donnée est inconnu "rrrrrrrrrrrrrr" En feuille 1: Sub ConnecterBase(ConnectBD As ADODB.Connection, _ CheminBD As String, _...
  9. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA Private Sub CommandButton1_Click() Dim NumCde As String Dim Requete As String NumCde = TextBox1.Value Requete = "select ((T2.'GEST' || TO_CHAR(TRUNC(T2.'NU_CDE' ))) || TO_CHAR(TRUNC(T2.'LIG_CDE'))), T2.'MT_ENGAGE' - T3.'MT_LIQ' , T3.'MT_LIQ' , T2.'MT_ENGAGE'...
  10. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA bonjour, merci pour votre réponse le probleme c'est que je n'ai pas de fichier mdb, je tape directement sur un serveur oracle. En fait, le but c'est d'avoir un UserForm, ou l'utilisateur tapera un numéro de commande. Je souhaite récupérer ce numéro dans une...
  11. S

    Requete SQL SELECT en VBA

    Re : Requete SQL SELECT en VBA re J'ai essayé avec l'enregistreur de macro mais ca ne marche pas. Je sais pas si le lien que vous m'avez donné peut m'aider. Je cherche a acceder a une base sur un serveur oracle. Voila le code qui marche pas : Private Sub CommandButton1_Click() Dim...
  12. S

    Requete SQL SELECT en VBA

    Bonjour, je voudrai envoyer une requete en SQL de type SELECT avec VBA. J'ai créé dans un classeur connecté a la BDD un UserForm, code: Private Sub CommandButton1_Click() Dim NumCde As String Dim Requete As String NumCde = TextBox1.Value Requete = "select ((T2.'GEST' ||...
  13. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba Salut j'ai essayé avec l'index mais n'y suis pas arrivé. Je réréssayerai, mais en tous cas tout fonctionne comme je veux. @+
  14. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba C bon, en fait je récupére la chaine de la cellule concernée (toujours la meme) dans une variable et ca marche. Merci pour tout A+
  15. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba N'y aurait-il pas un moyen d'utiliser la fonction PivotFields avec pour parametre juste une partie de la chaine de caractères genre : .PivotFields( contient "Cmtbpm" ).Orientation = xlHidden ??
  16. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba Bon j'ai déclaré la variable Month en String, cela fonctionne. Le truc c'est que les champs que je veux supprimer ne seront plus les memes le premier jour du mois prochain. Je vais continuer de chercher la solution mais j'aurai...
  17. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba Salut J'ai utiliser l'enregistreur quime génère le code suivant : Workbooks.Open dFic ActiveWorkbook.ShowPivotTableFieldList = True ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Somme de Cmtbpm" &...
  18. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba Re merci pour la réponse. Je vais essayer l'enregistreur car je ne souhaite pas toucher a la source. Par contre, j'ai jamais utilisé l'enregistreur, ça fait vraiment pas longtemps que je pratique du VBA, je viens du C++ (ya déjà...
  19. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba En piece jointe les fichiers concernés. Le TCD se trouve dans CompteDanger en feuille récap. C'est les colonnes D et E du TCD que je voudrai intégrer en fonction du mois en cours. Merci pour votre aide A+
  20. S

    Modifier un croisé dynamique existant avec une macro vba

    Re : Modifier un croisé dynamique existant avec une macro vba En piéce jointe, le fichier de ma macro. Merci pour votre aide