733 résultats trouvés

par AMIR
19 mars 2019, 13:01
Forum : Excel - VBA
Sujet : Formule trop longue et message: vous avez tapé un nombre
Réponses : 5
Vues : 80

Re: Formule trop longue et message: vous avez tapé un nombre

Salut
je pense que la bonne chose est de demander a nouveau ce que tu veux de cette formule ( quels conditions ... )
par AMIR
13 mars 2019, 12:54
Forum : Discussions générales
Sujet : Crise Alphabétique
Réponses : 4
Vues : 127

Re: Crise Alphabétique

Salut C'est vrai que nous somme doués de tout ce que est intelligent :ordi3: ; mais si nous laissons nos désires des codes intelligents choisir un avatar , alors ca va nous rapproche a une machine :spider: ; une fenêtre de l’avatar a mon avis doit rester vide jusqu’à que son propriétaire choisit une...
par AMIR
12 mars 2019, 21:28
Forum : Discussions générales
Sujet : Crise Alphabétique
Réponses : 4
Vues : 127

Re: Crise Alphabétique

Salut ric
Et moi que j ai croyais que c'est une épidémie :lole: ; j ai même pense a contacter Mr Sébastien :scritch:
par AMIR
12 mars 2019, 20:00
Forum : Discussions générales
Sujet : Crise Alphabétique
Réponses : 4
Vues : 127

Crise Alphabétique

Salut
C’est quoi cette crise Alphabétique ? tous monde est transforme en lettre :ko:
par AMIR
12 mars 2019, 19:07
Forum : Excel - VBA
Sujet : While Split sur 2007 > pas sur 2016
Réponses : 4
Vues : 41

Re: While Split sur 2007 > pas sur 2016

Salut Le code ne fonctionne pas aussi sur EXEL 2007 si on désactive le gestionnaire des erreurs Sub Décomposer() s = Cells(1, 1) i = 0 ' On Error GoTo fin tbl = Split(s, Chr(10)) MsgBox UBound(tbl) Do While Split(s, Chr(10))(i) <> "" Cells(1, i + 2) = Split(s, Chr(10))(i) i = i + 1 Loop 'While Split...
par AMIR
10 mars 2019, 13:58
Forum : Excel - VBA
Sujet : Format date avec combobox
Réponses : 4
Vues : 91

Re: Format date avec combobox

Salut paritec , KTM
essaye ca
KTMx.xlsm
(31.33 Kio) Téléchargé 9 fois
par AMIR
15 février 2019, 14:21
Forum : Excel - VBA
Sujet : Boucle si plusieurs valeurs égale à une valeur de référence
Réponses : 5
Vues : 78

Re: Boucle si plusieurs valeurs égale à une valeur de référence

Salut Puis tu ne définis pas drnlgn c’est normal ?! bien sur cpas normal :il doit être drnlgn1 a la place de drnlgn menant tu peux essayer ca Sub test() Set Date1 = Worksheets("Sheet1") Set Date2 = Worksheets("Sheet2") DateC = Date1.Range("C1") drnlgn1 = Date1.Cells(Rows.Count, "A").End(xlUp).Row dr...
par AMIR
11 février 2019, 23:54
Forum : Excel - VBA
Sujet : Listbox 2 colonnes et tri personnalisé
Réponses : 2
Vues : 69

Re: Listbox 2 colonnes et tri personnalisé

Salut
essaye ca :
TRI de A _ Z.xlsm
(24.72 Kio) Téléchargé 6 fois
par AMIR
11 février 2019, 21:50
Forum : Excel - VBA
Sujet : Boucle si plusieurs valeurs égale à une valeur de référence
Réponses : 5
Vues : 78

Re: Boucle si plusieurs valeurs égale à une valeur de référence

Salut hugo.c Sub test() Set Date1 = Worksheets("Sheet1") Set Date2 = Worksheets("Sheet2") DateC = Date1.Range("C1") drnlgn1 = Date1.Cells(Rows.Count, "A").End(xlUp).Row drnlgn2 = Date2.Cells(Rows.Count, "A").End(xlUp).Row For i = 2 To drnlgn If Date1.Cells(i, "A").Value = DateC.Value Then drnlgn2 = ...
par AMIR
11 février 2019, 21:35
Forum : Excel - VBA
Sujet : Erreur de syntaxe
Réponses : 8
Vues : 80

Re: Erreur de syntaxe

Salut i20100, VDMICHEL
essaye ca :
For i = ActiveSheet.UsedRange.Rows.Count To 2 Step -1
  If Cells(i, 6).Value > 1 Then
      Rows(i).Delete
  End If
Next i