Couper coller une cellule tout à la fin

Bonjour,

J'aimerais réaliser une macro sur sheets qui me permette de :

1) couper la cellule active

2) la coller tout à la fin de la ligne correspondante.

L'idée est d'archiver des informations en les mettant tout à la fin de la ligne, donc juste après la dernière cellule non vide.

J'ai bien sûr essayé d'enregistrer la manip, mais le script généré ne tient pas compte de la variable que représente le fait d'aller chercher la dernière colonne :

function Macrosanstitre() {
  var spreadsheet = SpreadsheetApp.getActive();
  spreadsheet.getCurrentCell().getNextDataCell(SpreadsheetApp.Direction.NEXT).activate();
  spreadsheet.getCurrentCell().offset(0, 1).activate();
  spreadsheet.getCurrentCell().offset(0, -4).moveTo(spreadsheet.getActiveRange());
};

Un petit coup de main ?

Bonjour,

Après quelques recherches je me suis essayé à une macro manuelle et ça donne ça :

function Tachearchivee() {
  var ss = SpreadsheetApp.getActiveSpreadsheet();
  var sheet = ss.getActiveSheet();
  var cell = sheet.getCurrentCell();
  var lastColumn = cell.getLastColumn();
  var newCell = cell.offset(0,lastColumn+1);
  var rowcell = cell.getRow();
  var columncell = cell.getColumn();
  var rownewCell = newCell.getRow();
  var columnnewCell = newCell.getColumn();
  sheet.getCurrentCell().setBackground('#d9d9d9');
  sheet.getRange(rowcell,columncell).moveTo(sheet.getRange(rownewCell,columnnewCell));
};

Bien entendu, ça ne fonctionne pas la cellule ne va pas tout à la fin de la ligne mais au milieu je dois mal faire quelque chose, mais je ne sais pas quoi... help !

Bonjour,

Problème résolu :

function Taskdone() {
  var ss = SpreadsheetApp.getActiveSpreadsheet();
  var sheet = ss.getActiveSheet();
  var cell = sheet.getActiveCell();
  var rowcell = cell.getRow();
  var columncell = cell.getColumn();
  var columnnewCell = cell.getNextDataCell(SpreadsheetApp.Direction.NEXT).getColumn();
  sheet.getActiveCell().setBackground('#d9d9d9');
  sheet.getRange(rowcell,columncell).moveTo(sheet.getRange(rowcell,columnnewCell+1));
};
Rechercher des sujets similaires à "couper coller tout fin"