XL 2021 Calendrier des marées info

[Nicolas JACQUIN]

Bonjour à tous,

A ceux qui ont le pied marin,

je voulais savoir s'il était possible de créer un calendrier des marées avec :
-les heures de marée Haute
-les heures de marée Basse

et éventuellement les coefs.

Je ne sais pas du tout si c'est possible, mais si certains ont déjà étudiés sur la chose je suis preneur.

Je sais qu'il y a plein de site en ligne qui donne ce que je veux, mais se serait pour compléter un calendrier
avec les phases lunaires, éphémérides ..........

Si ça peut aider je suis de la région Lorientaise (Bretagne)

En vous remerciant d'avance.

Nicolas

 

[Nicolas JACQUIN]

Bonjour à tous,

Oui effectivement j'ai le code erreur aussi, le jour +10 pour obtenir les marées via le site des marées se fait au niveau du combobox "Date", mais ne se fait pas sur la feuille des marées.

Si je prends Belle-ile (le palais) sur le combobox j'ai du 29/08 au 11/09
mais sur la feuille Marées j'ai du 29/08 au 09/09 donc si je clic sur le 10/09 ou le 11/09 j'ai l'erreur 13 aussi

 

[Nicolas JACQUIN]

L'actualisation se fait sans se faire

 

[Nicolas JACQUIN]

Parce qu'on ne devrait même plus avoir les marées du mois d'aout en fait,
vu que c'est Jour J + 10 prochains jours

 

[dysorthographie]

Pour ce qui concerne Belle-ile et la date du 29/08 j'avais expliqué que adodb typait c'est champ par expérience et qu'il lui fallait une ligne à évaluer.

Il est possible de supprimer la première ligne, mais le problème ne vient pas de là.

Il y a un traitement sur les dates don je ne suis pas l'auteur qui est mal évalué sur le changement de date dans la listebox dates.

Ceci dit je ne savais qu'il fallait supprimer les valeurs existante.

Je comprendrais qu'il ne faille pas garder les dates depuis 1910 mais sur 6 mois ou 1 ans...

 

[Nicolas JACQUIN]

Oui ok j'ai compris les mises à jours se font par le bas et l'erreur vient de là

Private Sub Dates_Change()
    A = Year(Range("B1")): M = Month(Range("B1")): j = Left(ActiveCell, 2)
    vdate = DateSerial(A, M, j)
    Forme.Lbl_MaréeJour = IIf(vdate = Date, "Marée d'aujourd'hui", "Marée du" & " " & vdate)
    If VILLES.ListIndex > -1 Then requête
End Sub

A modifier par

Private Sub Dates_Change()
    If VILLES.ListIndex > -1 Then requête
End Sub

Merci Robert

 

[jcf6464]

Re

Avec la modif de Nicolas cela fonctionne bien merci

a+ jcf

 

[Nicolas JACQUIN]

Re

Avec la modif de Nicolas cela fonctionne bien merci

a+ jcf

Re, c'est moi en faites qui avais créé l'erreur involontairement sur le code de dysorthographie

 

[TooFatBoy]

J'avais fait le code si dessous, qui fonctionnais très bien,

Sub Mareee(vdate As Date)

A = Year(Range("B1")): M = month(Range("B1")): j = Left(ActiveCell, 2)
vdate = DateSerial(A, M, j)

Forme.Lbl_MaréeJour = IIf(vdate = Date, "Marée d'aujourd'hui", "Marée du" & " " & vdate)

If vdate < Date Then
Forme.Lbl_MaréeJour = "Les données ne sont plus disponibles"
Forme.Lbl_MaréeJour.ForeColor = &HFF&
End If

If vdate > Date + 10 Then
Forme.Lbl_MaréeJour = "Les données ne sont pas encore disponibles pour cette date"
Forme.Lbl_MaréeJour.ForeColor = &HFF&
End If

End Sub

Je ne sais pas ce que contient B1, et encore moins ce que contient la cellule active, mais je me, et te, pose une question :
y a-t-il un réel intérêt à calculer vdate alors qu'on connaît déjà sa valeur ?

Je vois qu'une fois de plus je n'aurais jamais de réponse de ta part à une de mes questions...


Puisque mes questions semblent te gêner, et vu que je ne veux pas être un tortionnaire , tu peux dormir tranquille je vais de nouveau essayer de faire ce qu'il faut pour ne plus t'en poser.

Kenavo

 

[Nicolas JACQUIN]

Bonjour TooFatBoy,

Maintenant je sais ce que contient B1, et ce que contient la cellule active, mais sans réponse de la part de l'auteur de cette macro je me, et lui, demande toujours s'il y a réellement un intérêt à calculer vdate alors qu'on connaît déjà sa valeur.


Et j'ajoute : chez moi non plus pas de bug avec #275.

J'essayais de trouvé une parade mais j'étais carrément à coté, comme d'hab

 

[dysorthographie]

bonsoir,
une autre approche si c'est possible

Il faut passer par le formulaire sélection un département une ville pour importer les marées de cette ville ce que évite un traitement trop long.

On importe qu ce don on a besoin.

 

[Nicolas JACQUIN]

bonsoir,
une autre approche si c'est possible

Il faut passer par le formulaire sélection un département une ville pour importer les marées de cette ville ce que évite un traitement trop long.

On importe qu ce don on a besoin.

Bonjour Robert,

Je viens de voir ton fichier, plusieurs problèmes, mais je pense que c'est qu'une approche:

-Morbihan inexistant
-bug des qu'on clic sur département ou autres
-Phase lunaire qui manque, je c'est pas si ça vient du classeur

Mais ça peut être pas mal je pense

 

[dysorthographie]

Bonjour,
J'ai pris ton dernier fichier, j'ai rajouté un combox pour les départements.

Le message d'alerte sur les propriétés je te l'avais déjà signalé dans un poste précédent.

XL 2021 - Calendrier des marées info

Bonjour à tous, A ceux qui ont le pied marin, je voulais savoir s'il était possible de créer un calendrier des marées avec : -les heures de marée Haute -les heures de marée Basse et éventuellement les coefs. Je ne sais pas du tout si c'est possible, mais si certains ont déjà étudiés sur...

excel-downloads.com

Quand execute le formulaire à partir de VBA pas de problème. Le message d'alerte s'affiche quand on sélectionne une cellule sur le planning veux que la macro lance le formulaire depuis sélection change.

Je ne sais pas ce qui provoque ce message et j'ai pas trouvé.

Pour ce qui concerne Morbihan je t'avoue que j'ai fait une macro qui récupère routes les villes de la liste déroulante du site,il n'était pas question de tout retranscrire à la main.

Difficile à dire combien il ya de manquant mais tu peux rajouter manuellement ceux qui seraient manquants et que tu connais.

Pour la lunaison je n'ai rien touché.

 

[Nicolas JACQUIN]

Pour la lunaison je n'ai rien touché.

Je me suis sans doute enméllé entre les messages, j'en perd ma tête

 

[vgendron]

tu devrais renommer ton ficher selon le post dans lequel il intervient.. comme je l'ai fait pour les modifs liées à la lunaison..
ici, ce serait "calendrier marées"

Comme les macros que les uns et les autres modifient sont dans des modules bien nommés, séparés, ca te permettrait de ne pas tout mélanger

 

[dysorthographie]

Moi je suis narcissique donc je signe RD
C'est mieux que V#295