Remover hiperligações de cada célula numa folha de cálculo do Excel

Este exemplo limpa todas as hiperligações da folha de cálculo atual. Percorre a folha de cálculo e, se existir alguma hiperligação associada à célula, limpa a hiperligação e mantém o valor da célula tal como está. Regista também o tempo necessário para concluir o percurso.

Observação

Isto só funciona se a contagem de células for < de 10 mil.

Configuração: ficheiro do Excel de exemplo

Este livro contém os dados, objetos e formatação esperados pelo script.

Transferir o livro de exemplo

Código de exemplo: Remover hiperligações

Execute o seguinte script no livro de exemplo e experimente o exemplo! Abra o Editor de Código ao aceder a Automatizar>a Criação de Novo Script>no Editor de Código, substitua o código predefinido pelo código de exemplo que pretende executar e, em seguida, selecione Executar.

function main(workbook: ExcelScript.Workbook, sheetName: string = 'Sheet1') {
  // Get the active worksheet. 
  let sheet = workbook.getWorksheet(sheetName);

  // Get the used range to operate on.
  // For large ranges (over 10000 entries), consider splitting the operation into batches for performance.
  const targetRange = sheet.getUsedRange(true);
  console.log(`Target Range to clear hyperlinks from: ${targetRange.getAddress()}`);

  const rowCount = targetRange.getRowCount();
  const colCount = targetRange.getColumnCount();
  console.log(`Searching for hyperlinks in ${targetRange.getAddress()} which contains ${(rowCount * colCount)} cells`);

  // Go through each individual cell looking for a hyperlink. 
  // This allows us to limit the formatting changes to only the cells with hyperlink formatting.
  let clearedCount = 0;
  for (let i = 0; i < rowCount; i++) {
    for (let j = 0; j < colCount; j++) {
      const cell = targetRange.getCell(i, j);
      const hyperlink = cell.getHyperlink();
      if (hyperlink) {
        cell.clear(ExcelScript.ClearApplyTo.hyperlinks);
        cell.getFormat().getFont().setUnderline(ExcelScript.RangeUnderlineStyle.none);
        cell.getFormat().getFont().setColor('Black');
        clearedCount++;
      }
    }
  }

  console.log(`Done. Cleared hyperlinks from ${clearedCount} cells`);
}

Vídeo de formação: Remover hiperligações de cada célula numa folha de cálculo do Excel

Veja Sudhi Ramamurthy a percorrer este exemplo no YouTube.