Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour
Dans une textbox (multiligne) je voudrais supprimer la dernière ligne.
j'ai essayé de compter le nb de lignes avec une variable "Del"
Del=textbox1.LineCount → cela ne marche pas
est ce que quelqu'un aurait une solution?
D'avance merci
Bonsoir
je voudrais un code qui "exit sub" si aucune ligne n'a été "chekée" dans une listview
j'ai essayé :
Dim j As Integer
With ListView2
For j = 1 To .ListItems.Count
If .ListItems(j).Checked = False Then
MsgBox ("aucune ligne n'a été sélectionnée, veuillez en...
Bonjour
Quand j'ouvre un userforme Je voudrais récupérer la value de certaines txtbox dans une variable pour pouvoir la comparer si changement de cette txtbox.
j'ai essayé avec des variables static, public je n'arrive pas à faire fonctionner
pour exemple
Private Sub UserForm_Initialize
Dim...
Bonjour je suis en train de faire une fichier pour gérer mes commandes
Je souhaiterais un code qui simplifie celui-ci (code réalisé sur les 2 premières lignes)
si j'ai 25 lignes ce sera long ...
donc J'ai un prix/U x Quantité x remise % (qui peut avoir des virgules)
je souhaiterais aussi la mise...
Bonjour
Le code ci-dessous me permet d'aller chercher des valeurs de "N° Outil"
les outils sont appelés N° 0001 / N° 0002 / N° 0003 ...
Le problème est que j'ai des outils en double qui sont appelés par exemple N° 0007 et N° 0007 - Bis
Si je fait une recherche du N° 0007 la recherche ne...
Je cherche à simplifier ces boucles en 1 seule
Merci pour votre aide
'Remplissage des références
E = 37
For C = 10 To 164 Step 11
If Me.Controls("TextBox" & C).Value <> "" Then
Cells(L, E).Value = Me.Controls("TextBox" & C).Value
E = E + 6
End If
Next
'Remplissage des désignations Op
E = 39...
J'ai un pb avec ce sous programme qui me permettrai de faire une somme de plusieurs multiplications en boucle a partir de textbox 200 à 220
J'ai réalisé cette boucle mais elle ne fonctionne pas :
J'ai comme message " incompatibilité de type"
Sub CalculTotalFI()
D = 0
For E = 200 To 220 Step 2...
Bonjour
Je voudrais une solutions pour supprimer l'ensemble des lignes vides contenues dans une cellule
Le code que j'ai trouvé ne supprime qu'une seule ligne et non toutes d'un coup
Bonjour
Quand je valide la création d'une référence en passant par le bouton "Lancement création référence"→j'arrive sur le UserForm "Page2CréationRéférence" et que je valide la création la macro d'enregistrement de la référence fonctionne.
Par contre passe à l'ouverture du fichier quand je...
Bonjour
Voir code complet ci dessous.
Sur cette ligne de code qui est une sorte de recherche V:
.Controls("TextBox" & D) = Application.WorksheetFunction.VLookup(Me.Controls("ComboBox" & C), Sheets("Source 1").Range("ListeGlobaleRefLacour"), E, 0)
Ce code me complète les textbox 131→136...
Bonjour
Quand je click sur le btn de validation dans les userform de création référence / Creation matière/ création client, excel plante très souvent et me met en message:
"la méthode value de l'objet range a échoué"
J'ai lu que c'était apparemment un boucle qu'Excel n'arrivait pas à terminer...
Bonjours
je voudrais simplement copier toutes les lignes contenant une "X" dans la colonne D dans une nouveau fichier, et que ce fichier se mette automatiquement à jour en fonction de l'évolution du fichier "question gestion maintenance"
Merci de votre aide
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.