Profil de cs_jeannot45 - CodeS SourceS

Récupération d'un controle calendrier (MsCal.OCX)

Bonjour à tous et joyeuses fetes. Bien que la tete soit plutot à la fete, j'ai néanmoins un problème. Je souhaiterai mettre un controle calendrier dans un formulaire. Ce controle n'apparait pas dans la liste des ActiveX disponibles par ma barre d'outils. En recherchant tous les OCX, j'ai trouvé dans mon dossier System32 un fichier MSC... Lire la suite

Hello Dark Sidious ... Je reviens vers toi parce que j'ai oublié de préciser que je travaillais sur un formulaire d'Access et non dans un formulaire VB en effet, je ne trouve pas la commande Complément que tu précises. Je suis donc un peu géné aux entournures ... Encore merci pour le temps que tu avais pris pour me répondre Je...

Merci beaucoup Jeannot

Adresses vraiment relatives dans excel....

Bonjour à vous, je réalise actuellement une petite appli à l'aide d'excel, pour un projet à la fac, et la question que je me pose (sans trouver de solution) depuis plusieurs jours déjà est la suivante: comment faire, en VBA, pour que ce genre d'instructions fonctionne??? ( je pense que vous comprendrez aisément ce que je souhaite faire... Lire la suite

Bonjour, Je ne vois que RANGE ou CELLS désolé Jeannot

Bonjour, tu peux utiliser la syntaxe suivante pour travailler en relatif: ActiveCell.Offset(0,5).select cette syntaxe sélectionne la cellule placée sur la meme ligne mais décalée de 5 colonnes à droite de la cellule active. Jeannot

Exclusion de caractère

ALors voilà j'ai jamais fait de VB de ma vie...ça c'est pour mon niveau. Mais le truc que je veux faire n'a pas l'air bien compliqué. En fait je suis sur un feuille Excel avec une donnée fait diposée comme ceci à chaque ligne: Bertrand Dupond: b.d@domaine.com Ce que j'aimerais c'est pouvoir effacer en fait tout ce qui est avant les ... Lire la suite

bonjour, dans la colonne à coté de ta liste d'adresse email tu peux ecrire la formule suivante : =DROITE(A1;NBCAR(A1)-CHERCHE(":";A1)-1) A1 étant la cellule contenant l'adresse à traiter. Tu recopies cette formule sur toute tes lignes. Jeannot

fenetre ancrable et laisser la main a l'utilisateur

bonjour tt le monde je suis en train de realiser un petit programme sous vba pour autocad et je cherche a faire un userform ancrable et a pouvoir laisser la main a l'utilisateur s'il veut faire autre chose sur autocad (dessiner zoomer....) voila si qq'1 pe m'aider merci tt le monde @++

Regarde du cote de la propriété Modale ou Indépendante de ton UserForm Jeannot

Exporter le resultat d'une requete SQL

Bonjour, Je bosse sur un petit projet qui utilise Visual Basic sous Access 2000. Il consiste en une base de données "ma_base" à laquelle est couplée un formulaire Access. Ce formulaire me permet, en cochant des cases, de faire une recherche multicritère sur ma base. Le résultat est affiché dans une zone de Liste ....jusque là, tout ... Lire la suite

Peut etre une idée ... tu peux sur l'evement double-Clic de ton controle Zone de liste déclencher une macro qui utiliserait l'action "TranférerFeuilleCalcul" ... Jeannot

Comment télécharger un fichier sans l'ouvrir?

Salut, Je voudrais pouvoir sur mes pages mettre des fichiers à télécharger sans les ouvrir lorsqu'il existe un logiciel approprié sur le client. Quelqu'un a une idée?

j'ai le même problème dons si vous avez trouvé la solution entre temps, je prends Jeannot

Excel calendar pliz help ! ! !

Bonjour, je voudrais récupérer la date du calendrier dans le textbox sélectionné Voici le module avec une variable publique indiquant le textbox sélectionné (ici txt1) : Public Cont As Control et voici le code de mon UserForm : Sub UserForm_Initialize() Me.Calendar1.Visible = False End Sub Sub txt1_MouseDown(ByV... Lire la suite

voici un petit bout de code qui t'aidera peut etre: Private Sub Calendrier_Click() Me.DateDebut.Value = Me.Calendrier.Value End Sub Calendrier est le nom de mon objet Calendar DateDebut est le nom de mon controle texte Jeannot

Sommes d'une colonne a recuperer dans 1 autre feuille du classeur

Bonjour, Je vais essayé d'etre clair pour vous expliquer mon probleme (c pas gagné !!! lol) En fait, j'ai 15 feuilles Excel (nommées 1, 2, ...) + 1 feuille "montant" dans mon classeur excel. Dans les 15 premieres feuilles, j'ai une colonne (colonne L) dont je veux faire la somme et placer ensuite cette somme dans la cellule "A & num... Lire la suite

Voici une petite modification qui rend ta proc opérationnelle (le faite de faire EommeTemp = "=Sum(L2:L10000)", tu stockes une chaine de caractère dans ta variable. Sub MarcheParTheme() Application.ScreenUpdating = True Dim SommeTemp For feuille = 1 To 15 Sheets(CStr(feuille)).Activate Range("M1") = "=Sum(L2:L10000) Sheets...

URGENT!!!-Méthode Add-URGENT!!!

Bonjour, Je souhaite créer des contrôles en dynamique mais je ne trouve pas la méthode Add en vba. Elle existe sous vb mais je ne trouve pas sous vba. Il existe la commande createcontrol mais ça ne marche pas car il faut que le formulaire soit ouvert en mode création et moi je ne peux pas faire comme ça. Merci de m'aider car la je suis u... Lire la suite

A partir d'un recordset tu disposes des méthodes Addnew Edit Update Jeannot

vider une liste ACCESS

RE, j ai une liste dans mon formulaire qui recoit une requete quand je clique sur un bouton. J aimerais que quand j ouvre mon formulaire que cette liste soit vide. Comment fait on Merci :shy) Amaya ;)

Il faudrait au départ que ta liste soit indépendante. Dans l'évenement Sur Clic de ton bouton tu pourrait avoir le code suivant : Me.LaListeIndependante.RowSource = "Select * From TableSource" Me.LaListeIndependante.Requery A l'ouverture du formulaire: tu pourrais avoir le code : Me.LaListeIndependante.RowSource = "" Me.La...

Comment acceder a un champ d'une table sans savoir son nom

allo tout le monde, j'ai déja vu cette ligne de code où on pouvait ajouter une valeur a un champ sans avoir a savoir le nom du champ dans la table, seulement en sachant le numero de sa colonne. est ce que l'un de vous saurez comment le faire ou bien j'ai halluciner ce code ? merci de me répondre :)

bonjour, je voudrai simplement compléter le dernier code présenté: Dim maBase As Database Dim monJeu As Recordset Set maBase = CurrentDb Set monJeu = maBase.OpenRecordset(table,dbOpenTable) au lieu de ces lignes: monJeu.AddNew monJeu!noClient = Numero monJeu!noService = numService monJeu.Update écrit : with MonJeu ...

Nombre de lignes dans une feuille Excel

J'ai un petit pb : je veux recopier les valeurs d'une colonne d'une feuille Excel vers un fichier text et pour cela, il me faudrait le nombre de lignes "utilisées" dans cette feuille. Si qqn peut m'aider, merci d'avance. A+ RouX

Autre possiblite: Dim NbLigne As Integer ActiveCell.CurrentRegion.Select nblignes = Selection.Rows.Count Remarque : UsedRange correspond à toute la zone de feuille utilisée a partir de A1 donc si tu as un titre dans ta feuille tu récupères de lignes peut etre inutiles. Jeannot

récupérer valeur des variables et las copier dans une autre feuille

bonjour je n'arrive pas à récupérer la valeur de mes variables pour les recopier dans une autre feuille. voici mon code: dim plage_relevé as range, r1 as range, r2 as range... num = .Cells(ligne_dossier, numDossier).Value datcrea = .Cells(ligne_dossier, dateCreation).Value dataffec = .Cells(ligne_dossier, dateAffectation).Value ... Lire la suite

Le probleme vient du fait que le type Range permet de stocker des références de cellules. Tu récupères dans tes varaibles des valeurs et non des références. Change donc ton type de données au niveau de tes variables en fonction des données qu'elles sont destinées à recevoir. Maintenant si tu dois récupérer l'adresse de ta cellule ut...

Pb de suppression d'enregistrement

Le probleme est que je ne peut pas supprimer d'enregistrement. Je m'explique. J'utilise la méthode delete (Recordset.delete) cependant un message d'erreur apparait: - operation non autorisé pour ce type d'objet Pourquoi ce message apparait, et pourquoi lma suppression ne se fait pas ? et comment puis-je y remedié ????? me... Lire la suite

Bonjour, N'y aurait-il pas un problème de relations avec intégrite référentielle ? Jeannot

ACCESS - ETAT AVEC REQUETE ANALYSE CROISEE

Comment puis je gérer ma requête analyse croisée dans un état ? Le nombre de champs varie sans arrêt... Qqun pourrait il m'indiquer la démarche à suivre... Merci d'avance

tu as l'explication de la démarche à suivre dans la base de données exemple "Solutions" livrée avec le pack office Jeannot

Développer en VB ou en VBA ?

Je me pose la question du support à utiliser pour un développement professsionnel. Ma base de données sera sur SQL SErver et mon environnement utilisateur (formulaires, états)sur ... ? tel est la question. Je vous remercie par avance pour vos lumières sur ce choix difficile entre VB et VBA Access. Coform Lire la suite

Je pencherai plutot VB, même si cela semblera plus difficile. Si tu utilises VBA Access, il sera nécessaire que chaque utilisateur dispose d'un access sur son poste. Si cela est le cas, alors programme en VBA Access Jeannot

Decalaration de variable

bonjour a tous, J'ai un probleme pour declarer une variable. Je veux faire une simple addition ou soustraction avec des chiffre a virgule mais des que je choisi mon format "Single" ou "Double", il me fait des arrondi bizarre. Voici un exemple : Dim t As Double t = 270.9 - 275.67 T me retourne la valeur : -4,77000....4 Bizarre, no... Lire la suite

bonjour, tu peux aussi déclarer ta variable as Currency. Ce type ne concerne pas forcément des valeurs monétaires, mais aussi des nombres décimaux qui sont gérés avec une virgule fixe avec 4 décimales. Les types Single et Double gèrent des nombres avec virgules flottantes. Jeannot