Recherche:

Bonjour,

Avant tout je ne suis pas sure des termes que j'utilise, n'hésitez à corrigé mon vocabulaire.

Je cherche donc à récupère une variable autolisp sous vba

mon autolisp:

(setq...

regarde le fichier ci-joint
627603
Les formules sont dans la colonne E

Bonjour EricDgn,

grâce à ton code j'ai pu retrouvé le différentes clés qui gèrent les extensions.
ici pour un DWG
HKEY_CLASSES_ROOT\.dwg
HKEY_CURRENT_USER\Software\Classes\.dwg...

RE,
La formule pour E3 à incrémenter dans la colonne E:
=SI(MAX(LIGNE(B:B)*(B:B="VENTE"))=LIGNE(); D3*0.985-(D$3/C$3*25+D2)*1.015/175*C3; SI(B3="ACHAT";"";SI($C$1<0;"Crédit insuffisant : Solde qtés...

une idée, une piste ???
Helpppp:aie:

J'ai oublié de te fournir un dernier outil, pour trouver la dernière occurrence de ACHAT.
te fournit le n° de ligne de la dernière occurrence:
=MAX(LIGNE(A:A)*(A:A="ACHAT"))
te fournit le n° de...

BENGR,
la fonction SI peux fonctionner en cascade, de base =SI(ma condition ; Valeur vrais ; Valeur fausse)
cela peux devenir =SI (ma 1er condition ; SI (Ma 2eme condition ; Valeur vrais de ma...

Bonjour,

Est-ce que un AutoFit de la feuille te conviendrait?

WorkSheets("Devis").Cells.EntireRow.AutoFit

Bonjour,

pour interdire la vente tu peux commencer avec une formule SI:
=SI(C2<0;"Crédit insuffisant : Solde qtés " & C2; "ici la formule de calcule")
pour la formule de calcule je n'ai pas...

Bonjour,

Savez-vous où sont déterminé les programmes d'ouverture de liens hypertexte se trouvant sur une feuille Excel?

Je m'explique:
Lorsque double clic sur un fichier pdf depuis un...

Super Carboleum,
Pour le coup avec ma variable :

(<= (atof(vl-string-subst "." "," TE_OUT)) 3.3)
Merci

Bonjour,

Je cherche à convertir une variable de type string en type double.
J'ai testé avec atof:

_$ (atof "97.1")
return --> 97.1
_$ (atof "97,1")
return --> 97.0
_$ TE_OUT

Bonjour py86acces,

Perso je fais des requêtes via IBM mais je ne pense pas qu'il y est de grosses différences sur le principe.
Voila ce que j'utilise:
Dim Con As New ADODB.Connection
Dim txtc...

salut,

un peu de lecture ne fait pas de mal : https://excel.developpez.com/faq/?page=FenetresExcel#FileDialog
... un peu de recherche aussi.

a+

Bonjour Marc_Ingé,
As tu regardé du coté des plages nommées ?
Sous l’onglet Formules, dans le groupe Noms définis, cliquez sur Gestionnaire de noms.
Ici tu peux nommer un group de cellules, dans...

RE bonjour,

la ligne de code ".Select" est exactement ce que tu as besoin.

le problème est plus dans l'organisation de ta procédure (voir commentaire en rouge):
Private Sub Bt1_Click()
Dim...

Bonjour Vba14,

la solution est de ne pas cacher ta UserForm ("UfAccueil") quand tu ouvres word.
pour cela il faut ouvrir la UserForm en Modeless
UserForm1.Show (vbModeless)et supprimer le...

bonjour,

regarde ici : https://silkyroad.developpez.com/VBA/ListView/

j'ai imaginé de ressaisir les cellules une à une = Cells(i, "A") = Cells(i, "A") Non?
si tu veux aller plus loin, tu peux faire un truc du genre:
Dim monFormat As Variant
For c = 1 To 40
...

Bonjour,

Voici un tuto sue les contrôles dans un UserForm, ça peut t'aider: ici

bonjour,

As-tu regardé des sujet similaire:
https://www.developpez.net/forums/d1523457/logiciels/microsoft-office/excel/simuler-f2-p-entree/

Bonjour Barba,

Pour mettre le code entre balise il faut cliquer sur le bouton # et mettre le code entre ['CODE] et ['/CODE] (j'ai ajouté un apostrophe)

Sinon écrire des formules en VBA est...

Bonjour goldstar,

voici un début de piste:

Sub Envoi_email()
Dim OutApp As Outlook.Application
Dim myNamespace As Outlook.Namespace
Dim FldBrouillons As...

un petit plus pour remplir ton formulaire :
Private Sub UserForm_Activate()
Dim Ctrl As Control
For Each Ctrl In UserForm1.Controls
If TypeOf Ctrl Is MSForms.CheckBox Then
...

Bonjour Mél,

Si j'ai bien compris:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Call Incremente("ALIMENTAIRES")
Else
Call DesIncremente("ALIMENTAIRES")...