YORAN49
Messages postés6Date d'inscriptionlundi 20 octobre 2008StatutMembreDernière intervention17 juillet 2009
-
8 juil. 2009 à 09:00
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 2015
-
12 juil. 2009 à 03:21
J'ai un programme qui permet de détecter si il y a un fichier excel toutes les 5 minutes dans un folder, ensuite il doit l'analyser et envoyer un mail d'erreur si il detecte quelque chose, (enfin j'espere)
Le programme ne veut pas se compiler à "range" il me dit que sub n'est pas definit!
Aidez-moi svp
Sub RechercheFichier()
code = Format(Date, "yymmdd")
Do
With Application.FileSearch
.NewSearch
.FileType = msoFileTypeAllFiles
.FileName = code & ".xls"
.LookIn = "C:\RECEPTIONS\Leh"
.Execute
If .foundfiles.Count = 0 Then
newhour = Hour(Now())
newminute = Minute(Now())
newsecond = Second(Now()) + 3
WaitTime = TimeSerial(newhour, newminute, newsecond)
Application.Wait Time
ElseIf .foundfiles.Count > 0 Then
Workbooks.Open (.foundfiles(1))
Dim MailAd As String
Dim Msg As String
Dim Subj As String
Dim URLto As String
If Range("a1").Value = Empty Or Range("e3").Value <> Range("f3").Value Then
MailAd = ("qqun1[mailto:qqun1@qq.com;qqun2@qq.com @qq.com;qqun2@qq.com]")
Subj = ("erreur fichier")
Msg = Msg & ("Le fichier que vous nous avez envoyé est vide")
URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End If
jmf0
Messages postés1566Date d'inscriptionmardi 26 décembre 2000StatutMembreDernière intervention 5 avril 20138 8 juil. 2009 à 11:51
Bonjour,
Que dois-tu faire ?
Du VBA, ma foi ...(ici, c'est du VB.Net) !!!
Commence par apprrendre à déterminer (c'est mille fois moins difficile que de développer) à quelle section du forum correspond ton outil de développement !
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 8 juil. 2009 à 21:43
Parce que Range appartient à l'objet Excel que tu as précédement dû ouvrir.
Il suffit de lui dire !
Exemple maFeuilleExcel.Range
Ce qui m'épate, c'est que tu soies en .Net ...
Si tu es dans le VBA de Excel, tu as perdu 24h pour n'avoir pas pris le temps de bien choisir la catégorie de ta question (super, non ?)
us_30
Messages postés2065Date d'inscriptionlundi 11 avril 2005StatutMembreDernière intervention14 mars 201610 8 juil. 2009 à 22:55
Bonsoir,
C'est vrai ça... Le programme est sans nul doute du VBA sous Excel, mais ta phrase : "Le programme ne veut pas se compiler ..."... COMPILER n'est pas possible en VBA... alors ? J'Comprend plus rien...
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 12 juil. 2009 à 03:21
Si si, on peut compiler en VBA, c'est même une action fréquente avant de lancer un programme pour, au moins, vérifier que la syntaxe est bonne.
(dans le VB, menu Debuguer + Compiler)
C'est l'équivalent du Ctrl-F5 de VB6, mais sans exécution derrière.