XL 2019 Exercice Excel VBA Simple

Oriento

XLDnaute Nouveau
Bonjour,

Pourriez-vous faire cet "exercice" ci-joint en PDF avec comme base le fichier Excel ci-joint, et me le renvoyer s'il vous plaît ? Cet "exercice" paraît assez simple, mais pour moi c'est un vrai casse-tête étant donné que je débute, j'en suis désolé.

Merci d'avance,

Cordialement
 

Pièces jointes

  • Entrainement Excel VBA.pdf
    541.3 KB · Affichages: 32
  • Excel Entrainement VBA.xlsm
    31.6 KB · Affichages: 11

Lolote83

XLDnaute Barbatruc
Re bonjour,
Exercice2
VB:
Sub Exercice2()
    For Each xCell In Range("A5:A30")
        If xCell >= 0 Then
            xCell.Offset(0, 1) = "Supérieur ou égale à zéro"
        Else
            xCell.Offset(0, 2) = "inférieur à zéro"
        End If
    Next xCell
End Sub

Exercice3
Code:
Sub Exercice3()
    For Each xCell In Range("B6:O30")
        Randomize
        xAlea = Int(50 * Rnd) + 1
        xCell.Value = xAlea
    Next xCell
End Sub

Excercice4
pas compris, il faut simplement ré-écrire le texte ?
Si oui, vous avez toutes les armes pour le faire
@+ Lolote83
 

Oriento

XLDnaute Nouveau
Super Lolote83 ! Je vais décortiquer ses lignes afin de les comprendres.

Sinon, pour l'exercice 2, j'ai remplacé ce que vous avez écrit entre guillemet par "xCell". Est-ce correcte ?

Et dernière question s'il vous plaît, au lieu d'utilisé la couleur de police en Rouge dans l'onglet Accueil, y'a-t-il un moyen de coder la couleur ?

Merci beaucoup
 
Dernière édition:

Lolote83

XLDnaute Barbatruc
Bonjour ERIIC,
Tu as entièrement raison mais c'est aussi grâce à tous les contributeurs qui partagent leurs connaissances dans ce forum que j'en suis moi même de temps en temps arrivé à proposer des solutions.
C'est vrai que livrer du tout cuit, ne permet pas forcément de faire cogiter le demandeur, mais en regardant les solutions, peut être que notre ami Oriento aura apprit quelques choses. C'est du moins ce que je suppose.
De plus, Oriento nous dit :
Super Lolote83 ! Je vais décortiquer ses lignes afin de les comprendre.
Il est vrai que la demande initiale m'a quelque peut interloqué mais bon....
Bonne journée
@+ Lolote83
 

patricktoulon

XLDnaute Barbatruc
Bonjour a tous
je n'ai pas envie d'aller travailler aujourd'hui vous pouvez y aller a ma place s'il vous plaît
avec tout mes remerciement
après ma sieste vers 5 h du soir je regarderais ce que vous avez fait histoire de comprendre comment vous faite histoire de ne pas me r'endormir idiot
🤣 🤣 🤣
 

Lolote83

XLDnaute Barbatruc
Bonjour Patrick,
Je veux bien aller travailler à ta place mais je ne penses pas que le résultat sera efficace.
Je vois au final que tout le monde m'accuse d'avoir répondu à cette demande.
Comme je l'ai dit, la demande initiale m'a tout de même interloqué.
Il est vrai que si la demande avait été faite en disant : "J'essaye de faire le truc, mais malgré mes recherches je n'y arrive pas, pouvez vous m'expliquer comment m'y prendre ......" cela aurait été moins problématique.
Bonne journée à toi
@+ Lolote83
 

patricktoulon

XLDnaute Barbatruc
re
non @Lolote83 personne ne t'accuse de quoi que ce soit
on va pas te reprocher d'aider quelqu'un même si c'est pas la bonne solution de le faire comme ça
de ce que j'ai vu des codes proposés c'est du niveau archi débutant et les formules de même
si le demandeur ne sais pas faire un calcul de tva , il a un sérieux problème
 

Discussions similaires

Réponses
3
Affichages
306

Statistiques des forums

Discussions
311 720
Messages
2 081 912
Membres
101 837
dernier inscrit
Ugo