Discussion :

[IPezed]

Bonsoir à vous, voilà la cause de ma peine :
je dispose de ce tableau en feuille 7

et je souhaite créer une feuille par mois.
Jusque là rien de bien sorcier seulement voilà,
lorsqu'il s'agit de mettre la date dans chacune de ses feuilles
ma boucle while par en sucette lors des 12 premiers jours de chaque mois et j'obtiens ça (ici sur le mois de janvier) :


Ayant absolument zéro idée du pourquoi du comment je vous laisse ici la boucle concernée :






suivie de l'intégralité de ma macro :




[ . . .] oui ce fut long à écrire x)




Je sais, c'est pas cool de vous laisser avec tout ça mais je n'ai aucune piste si ce n'est que peut-être que m s'incrémente quelque part de façon innatendue...
(je vous prie de ben bien vouloir m'excuser mais ne pouvant pas faire de copier/coller j'ai opté pour des images et non des balises de code)
EN vous remerciant d'avance,
IPezed.

[unparia]

Bonjour
Veux-tu s'il te plait bien mettre ici ton code en texte (entouré de balises code) et non sous forme d'image. Cela permettra de se référer (en les copiant collant) à certaines lignes de ton code. Ce n'est actuellement pas le cas.
Je vais pour l'instant me contenter d'appeler ton attention sur l'existence d'une fonction que tu devrais utiliser : la fonction Monthname (rubrique Monthname, fonction dans ton aide VBA)
Elle permet ceci, par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim k As Integer
For k = 1 To 12
 MsgBox MonthName(k)
Next

Tu devrais vite voir comment l'intégrer dans ton code et ainsi l'alléger
Nous parlerons d'autres aspects lorsque tu auras présenté ton code comme attendu et non sous forme d'une image.

[IPezed]

c'est bien dommage :/ comme je l'ai signalé, utiliser ces balises m'est impossible, en fait, cet macro se trouve sur un poste de travail auquel je n'ai plus acces pour le moment.
Cela dit, merci quand même pour ce petit conseil constructif.

[clementmarcotte]

Les balises, tu peux les utiliser dès que tu poses une question. Sinon, tu as un navigateur internet de broche-à-foin qui sort directement de Scrapville.

[clementmarcotte]

Bonjour

Nous parlerons d'autres aspects lorsque tu auras présenté ton code comme attendu et non sous forme d'une image.

Va falloir que tu ailles chez-lui pour lui expliquer. Il pense que les balises proviennent de Alpha du Centaure.

[Docmarti]

Bonjour.

Pour eviter l'ínversion jour/mois :
Ne pas ecrire une valeur de type Texte dans une cellule au format Date ou "Standard".
Ecrire une valeur de type Date dans une cellule au format Date ou au format "Standard"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Sub Sans_inversions()
 
  Ligne = 4
  m = 1
  dat = 10
 
  d = CDate(dat & "/0" & m & "/2017")
 
  Cells(Ligne, 1).NumberFormat = "General"
 
  Cells(Ligne, 1) = d
 
 
End Sub

[patricktoulon]

Vous êtes méchants les gars hein!!! son explorateur vient de pandora

[IPezed]

Vous êtes drôle les gens...
vous ne m'avez même pas lu jusqu'au bout
et vous vous moquez quand même
du coup c'est vous qui êtes ridicules
bref... je sais parfaitement comment fonctionnent les balises c'est juste que là j'ai pas mon code pour le copier/coller dedans
Je vais essayer ta méthode sans inversions dès que possible ! Merci

[clementmarcotte]

bref... je sais parfaitement comment fonctionnent les balises c'est juste que là j'ai pas mon code pour le copier/coller dedans

Si tu as OneNote, celui d'Office, pas celui gratuit du Windows Store, tu colles tes foutues images dedans. Il a un OCR incorporé. Juste à faire un clic-droit sur ton image et copier le texte de l'image

Ensuite tu colles le texte obtenu dans le Bloc-notes et tu corriges les erreurs de reconnaissance.

C'est à la portée de la plupart des intelligences à peu près normales.

Et puis, comme OneNote est inclus dans toutes les versions d'Office, tu as probablement OneNote.

[unparia]

Tout simplement :
1) Lorsque je lis :

mais ne pouvant pas faire de copier/coller j'ai opté pour des images et non des balises de code

c'était bien un choix délibéré. Et tu étais alors bien sur la machine de travail.
2) Il n'y a ici rien d'urgent en ce qui concerne l'aspect forum. Cela peut donc attendre que tu sois sur ta machine de travail.
A moins, bien sûr, qu'il t'y soit interdit d'y faire des copié/collés, de solliciter une aide externe, etc ... Si tel est le cas, ne transgresse pas cette interdiction (une interdiction a toujours une justification).

[IPezed]

Autant pour moi ! Je n'avais pas pensé à récuperer le texte de mes images sur le coup
Et oui tu as raison ça ne presse pas donc j'ajouterais le code
quand je prendrais un peu de temps pour ce souci technique de dates chelou