|
 Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
 Sujet : MESSAGE BOX VBA EXCEL [ Archives Visual Basic / VBA ] (thierrypp)
 Informations & options pour cette discussion
mercredi 28 août 2002 à 16:03:28 |
MESSAGE BOX VBA EXCEL
thierrypp
|
THIERRYPP BONJOUR, ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement: -chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes, -limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur, -entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2? Merci! Bonne Journeé! Thierrypp
|
|
|
mercredi 28 août 2002 à 16:18:42 |
Re : MESSAGE BOX VBA EXCEL
petitstagiaire
|
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 17:28:53 |
Re : MESSAGE BOX VBA EXCEL pour petitstagiaire
thierrypp
|
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 17:29:16 |
Re : MESSAGE BOX VBA EXCEL pour petitstagiaire
thierrypp
|
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 17:46:37 |
Re : MESSAGE BOX VBA EXCEL pour petitstagiaire
petitstagiaire
|
voila ce que j'ai compris ou plutôt ce que j'ai compris que je n'avais pas compris. compris ?
tu as un fichier dat avec seulement 2 colonnes
pourrais-tu me mettre quelques lignes de ce fichier
Qu'entend tu par rangee : une colonne ou une ligne ?
les valeurs a mettre en J1 et J2 c'est quoi ?
est ce toi qui doit les saisir ?
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 18:05:08 |
Re : pour petitstagiaire : nouvelle réponse aux questions!
thierrypp
|
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
voila ce que j'ai compris ou plutôt ce que j'ai compris que je n'avais pas compris. compris ?
tu as un fichier dat avec seulement 2 colonnes
pourrais-tu me mettre quelques lignes de ce fichier
===OUI; example:
abs ord
0 29.56
0.150 29.58
0.300 30.02
0.450 30.18
...
Qu'entend tu par rangee : une colonne ou une ligne ?
==rangée: horizontale example ici
0.150 29.58
les valeurs a mettre en J1 et J2 c'est quoi ?
est ce toi qui doit les saisir ?
==== oui, c'est moi qui doit les saisir manuellement; en fait J1= valeur ou abs=0, ici par example 29.56
par contre J2 est saisie par moi.
Vous avez raison, seule J2 est saisie! plus commode!
Merci beaucoup!
Thierrypp
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 18:05:56 |
Re : pour petitstagiaire : nouvelle réponse aux questions!
thierrypp
|
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
voila ce que j'ai compris ou plutôt ce que j'ai compris que je n'avais pas compris. compris ?
tu as un fichier dat avec seulement 2 colonnes
pourrais-tu me mettre quelques lignes de ce fichier
===OUI; example:
abs ord
0 29.56
0.150 29.58
0.300 30.02
0.450 30.18
...
Qu'entend tu par rangee : une colonne ou une ligne ?
==rangée: horizontale example ici
0.150 29.58
les valeurs a mettre en J1 et J2 c'est quoi ?
est ce toi qui doit les saisir ?
==== oui, c'est moi qui doit les saisir manuellement; en fait J1= valeur ou abs=0, ici par example 29.56
par contre J2 est saisie par moi.
Vous avez raison, seule J2 est saisie! plus commode!
Merci beaucoup!
Thierrypp
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 28 août 2002 à 18:06:14 |
Re : pour petitstagiaire : nouvelle réponse aux questions!
thierrypp
|
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
voila ce que j'ai compris ou plutôt ce que j'ai compris que je n'avais pas compris. compris ?
tu as un fichier dat avec seulement 2 colonnes
pourrais-tu me mettre quelques lignes de ce fichier
===OUI; example:
abs ord
0 29.56
0.150 29.58
0.300 30.02
0.450 30.18
...
Qu'entend tu par rangee : une colonne ou une ligne ?
==rangée: horizontale example ici
0.150 29.58
les valeurs a mettre en J1 et J2 c'est quoi ?
est ce toi qui doit les saisir ?
==== oui, c'est moi qui doit les saisir manuellement; en fait J1= valeur ou abs=0, ici par example 29.56
par contre J2 est saisie par moi.
Vous avez raison, seule J2 est saisie! plus commode!
Merci beaucoup!
Thierrypp
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
jeudi 29 août 2002 à 10:48:27 |
Re : pour petitstagiaire : nouvelle réponse aux questions!
petitstagiaire
|
désolé mais je n'ai pas encore tout bien saisi.
le bout de code suivant met tes valeurs dans les colonnes A et B. peut etre que tu va t'en sortir avec ça. normalement tu as juste a faire un copier coller.
'ouverture de la boite de dialogue du browser de fichiers
'récupération du nom du fichier dans Nom_Fichier
Nom_Fichier = Application.GetOpenFilename(fileFilter:="Fichier Dat (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Erreur d'ouverture"
Exit Sub
End If
'ouverture du fichier
Open Nom_Fichier For Input As #1
'on boucle jusqu'à la fin du fichier
While EOF(1) = False
'on récupère ligne par ligne
Line Input #1, Ligne
If Ligne <> "" Then
'calcul de la position d u séparateur espace
Position_Separateur = InStr(1, Ligne, " ")
'récupération de l'abscisse
Abscisse = Mid(Ligne, 1, Position_Separateur - 1)
'On met l'abscisse dans la colonne A
Range("A" & i).Value = Abscisse
'récupération de l'ordonnéé
Ordonnee = Mid(Ligne, Position_Separateur + 1)
'On met l'ordonnée dans la colonne "B"
Range("B" & i).Value = Ordonnee
'on incrémente le compteur du numéro de ligne à inserer
i = i + 1
End If
Wend
Close #1
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
voila ce que j'ai compris ou plutôt ce que j'ai compris que je n'avais pas compris. compris ?
tu as un fichier dat avec seulement 2 colonnes
pourrais-tu me mettre quelques lignes de ce fichier
===OUI; example:
abs ord
0 29.56
0.150 29.58
0.300 30.02
0.450 30.18
...
Qu'entend tu par rangee : une colonne ou une ligne ?
==rangée: horizontale example ici
0.150 29.58
les valeurs a mettre en J1 et J2 c'est quoi ?
est ce toi qui doit les saisir ?
==== oui, c'est moi qui doit les saisir manuellement; en fait J1= valeur ou abs=0, ici par example 29.56
par contre J2 est saisie par moi.
Vous avez raison, seule J2 est saisie! plus commode!
Merci beaucoup!
Thierrypp
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
Merci!
Oui, en fait:
1) une message box qui permette de localiser un fichier désiré, l'enregistrer sur une feuille Excel mais:
dans la message box, il doit y avoir la possibilité de prendre en compte la rangée numéro x jusqu'à y ( exemple rangée 3 à 52)
et aussi entrer manuellement 2 valeurs qui se retrouveront respectivement sur les cellules J1 et J2
de la même feuille Excel
2) donc avoir une macro ou tout est gérer par message box pour la transposition d'un fichier composé de deux colonnes en format .dat sur Excel avec les conditions évoquées!
merci!
thierrypp
THIERRYPP
-------------------------------
Réponse au message :
-------------------------------
Salut thierrypp,
pour le 1) je pense que c'est ça que tu veux
NomFichier = Application.GetOpenFilename(fileFilter:="Fichier WordPad (*.dat), *.dat")
If VarType(NomFichier) = vbBoolean Then
MsgBox "Open Action Failed"
Exit Sub
Else
MsgBox NomFichier
Workbooks.Open (NomFichier)
...
end if
pour le reste je crois bien que j'ai rien compris
petitstagiaire
-------------------------------
Réponse au message :
-------------------------------
THIERRYPP
BONJOUR,
ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:
-chercher (browse) un fichier format .dat ( wordpad) composö de deux colonnes,
-limiter l'enregistrement de la rangée à la première, seconde ou troisième jusqu'à un nombre demandé àl'utilisateur,
-entrer deux valeurs demandées ä l'utilisateur et les placer en cellule J1 et J2?
Merci! Bonne Journeé!
Thierrypp
|
|
|
mercredi 18 mai 2005 à 17:50:30 |
Re : MESSAGE BOX VBA EXCEL
kyoiory
|
salut desolé de vous interompre. je vous explique j ai un fichier html et je voudrai le parcourir en executant une macro bien sur et recuperer les données qui m'interesse. si vous avez une solution comment le faire vous sauverez la vie merci bq 
|
|
|
Cette discussion est classé dans : message, vba, excel, box, utilisateur
 Répondre à ce message
 Sujets en rapport avec ce message
MESSAGE BOX VBA EXCEL [ par thierrypp ]
THIERRYPP BONJOUR,ESt-il vraiment possible de lancer une macro Excel VBA proposant immédiatement:-chercher (browse) un fichier format .dat ( wordpad)
message Type Incompatible dans Appli VBA [ par cyriaque ]
bonjour à tous,j'ai développé une appli pour le suivi de temps passés sur des projets dans Excel 2000.LE PRINCIPE :les collaborateurs disposent d'une
Envoi d'un message à partir d'un code en VBA sur excel [ par jmq ]
Existe -t-il une fonction en VBA sur excel permettant d'envoyer un message via outlook ? merci
VBA Text Box Word Excel [ par kombakom ]
Bonjour, à partir d'Excel je voudrais remplacer du texte qui se trouve dans des text box dans un document Word.Avez-vous des idées de code?Merci beuco
VBA Excel : message d'alerte lors d'un copier coller [ par Cybertat ]
Bonjour à tous, Dans mon programme en vba je fait un copier coller de plusieurs lignes juste un peu plus haut sur la meme feuille. Le problème, c'est
programmation VBA [ par pierreroux ]
Bonjour,Je suis quasiment débutant sur Visual Basic Application Excel . Je suis en train d'essayer de faire des interfaces conviviales et claires pour
Message de confirmation dans VBA Excel [ par Maxou le petit ]
Bonjour; J'écrit une certains nombre d'instructios dans VBA du style de celle-ci dessous, lorsque le code est exécuté des messages de confirmation s
sécurisation source VBA/excel + code d'utilisation [ par Pat_TOTO ]
Bonjour,J'ai une petite appli en excel (1 fichier Bdd, 1 fichier de formules, 1 fichier appli purement en excel, le tout en VBA) que je souhaite sécur
graph et msgbox avec excel vba [ par kenn5423 ]
Bonjour, Je souhaite créer une boite de dialogue ou l'utilisateur doit rentrer des valeurs numeriques du type : dim E as double msg1 = " Enter a value
Message VBA sur 2 onglets fichier excel [ par avyrex1926 ]
Bonjour à tous, Je voudrais éffectuer sur mon projet une liste de personnes qui n'ont pas eu de formation. Je vous explique comment je vois ça. Dans m
 Livres en rapport
|
 Téléchargements
Logiciels à télécharger sur le même thème :
Comparez les prix Nouvelle version
|