Autres Mot automatique

sylvanu à dit:

Bonjour Moreno,
Un essai en PJ avec cette macro :

VB:

Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("F3:F1000,M3:M1000,T3:T1000")) Is Nothing Then
        If Target = "" Then Exit Sub
        Dim Lieux, i%
        Lieux = Array("V", "Vienne", "HR", "Hotel Rouge")   ' A enrichir avec Abbrev,Nom désiré
        For i = 0 To UBound(Lieux) Step 2
            If LCase(Target) = LCase(Lieux(i)) Then Target = Lieux(i + 1): Exit Sub
        Next i
    End If
Fin:
End Sub

Cliquez pour agrandir...

sylvanu à dit:

Les macros VBA ne marchent pas sous Google Sheet.
Sorry, c'était pas précisé.

Cliquez pour agrandir...

Moreno076 à dit:

Bonsoir à tous,

Dans le tableau ci-joint je souhaiterais que lorsque je saisie dans les colonnes F I M P T W la lettre V ca marque automatiquement Vienne, HR > hotel rouge etc, bref qu'avec une ou deux lettres ca me mette automatiquement un mot. Est-ce possible?

Merci pour votre aide.

Cliquez pour agrandir...

function onEdit(e) {
  var range = e.range;
  var column = range.getColumn();
  var columnsToCheck = [6, 9, 13, 16, 20, 23]; // Columns F, I, M, P, T, W

  if (columnsToCheck.includes(column)) {
    if (range.getValue() == "V") {
      range.setValue("Vienne");
    } else if (range.getValue() == "HR") {
      range.setValue("Hotel Rouge");
    }
  }
}

Franc58 à dit:

Bonsoir, dans Google Sheets tu peux utiliser des scripts Javascript.
Quand tu es sur ta feuille, clique sur Extensions puis Editeur de scripts.
Ajoute le script suivant :

JavaScript:

function onEdit(e) {
  var range = e.range;
  var column = range.getColumn();
  var columnsToCheck = [6, 9, 13, 16, 20, 23]; // Columns F, I, M, P, T, W

  if (columnsToCheck.includes(column)) {
    if (range.getValue() == "V") {
      range.setValue("Vienne");
    } else if (range.getValue() == "HR") {
      range.setValue("Hotel Rouge");
    }
  }
}

Ajoute autant de "else if" que nécessaire pour ajouter des conditions. Le code est exécuté sur les serveurs de Google, il y a donc un délai entre l'encodage dans la cellule et l'exécution du script.
Appuie sur l'icône disquette pour sauvegarder le script.

Cliquez pour agrandir...

Moreno076 à dit:

Bonsoir Franc58, je viens d'essayer mais j'ai du mal faire quelque chose ? Ci-joint fichiers Merci

Cliquez pour agrandir...

Franc58 à dit:

Quand tu es sur ta feuille Google Sheets, tu cliques sur le menu "Extension" puis sur "Apps script" et dans la fenêtre qui apparaît, tu colles le script que je t'ai donné, ensuite tu cliques sur l'icône disquette pour sauvegarder le script. J'ai testé et cela fonctionne parfaitement. Quelque chose m'échappe, tu dis travailler sur Google Sheets et tu m'envoies un fichier .xlsx ?

Cliquez pour agrandir...

Moreno076 à dit:

Oui je n'arrive pas à envoyer les fichiers google sheet. Ci-joint capture. Cdlt

Cliquez pour agrandir...

job75 à dit:

Bonsoir à tous,

Pour V => Vienne voyez le fichier joint et la Mise en forme conditionnelle (MFC).

A+

Cliquez pour agrandir...

Moreno076 à dit:

Bonsoir. Non ça ne va pas non plus. Merci quand même

Cliquez pour agrandir...