Una famiglia di prodotti software per l'elaborazione di testo Microsoft per la creazione di documenti Web, messaggi di posta elettronica e stampa.
La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.
Ciao Fabio_347,
Benvenuto nella community Microsoft.
Questo è un comportamento normale. Se le tabelle sono separate da interruzioni di riga o di pagina, queste due tabelle sono considerate entità separate e l'esecuzione di operazioni su una tabella non influirà sull'altra. Chiaramente non è la direzione di progettazione di Word consentire l'eliminazione di una colonna in una tabella per modificare automaticamente tutte le tabelle nell'intero documento.
Pertanto, se si desidera ottenere questa funzionalità, sarà necessario utilizzare VBA.
Apri il documento di Word, vai su Developer > Macros, inserisci un nome e crea una macro.
Incollare il codice seguente nell'area di modifica del codice. Premere CTRL+S per salvare il documento come documento abilitato alla macro di Word (.docm).
Sub DeleteColumnFromTables()
Dim colNum As Integer
Dim tbl As Table
Dim cell As cell
Dim i As Integer
colNum = InputBox("Inserisci il numero della colonna da eliminare:", "Elimina Colonna")
If colNum <= 0 Then
MsgBox "Inserisci un numero di colonna valido.", vbExclamation
Exit Sub
End If
For Each tbl In ActiveDocument.Tables
If colNum <= tbl.Columns.Count Then
tbl.Columns(colNum).Delete
Else
MsgBox "Colonna " & colNum & " non trovata nella tabella.", vbExclamation
End If
Next tbl
MsgBox "Colonna " & colNum & " eliminata con successo.", vbInformation
End Sub
A questo punto, torna alla finestra della macro appena creata ed esegui la macro.
A questo punto, Word ti chiederà quale colonna vuoi eliminare in blocco. Inserisci il numero. Ad esempio, se si desidera eliminare la seconda colonna, immettere 2 e premere OK.
La macro scorrerà automaticamente tutte le tabelle dell'intero documento ed eliminerà la seconda colonna.
Spero che la mia spiegazione abbia senso e attendo con ansia la tua risposta!
https://learn-attachment.microsoft.com/api/attachments/263f823a-3e82-4c57-bf17-0816cdd266b7?platform=QnA&fud_access=hC1SxZhn7m%2FZQJkOIiOVstu10yTQgXS4A%2FDBzZTg8nbaCgIogkrcDydMeI5Y4za2dOqDdWtsG2JNS3E35V60i9TiGHR7STMpJHheeXuDvO8nwjUlqCBHhJ0NDvuYN7OSDnKZyyJws%2FcetZ44ik%2F8V%2FagKd84Xo3Pnl67MKe2dznaMJbvuuTM4r%2BF3aaq%2F9K9vVrvu8Yhv2PkFE3FLo52xlL0z0NucbLPr10DLnmuszG%2Bm1u%2FMeZJWaoYsipITSl42xnLKqgTd5GN%2FfQDzCtuxzzCkncIAtoLQTqKhpwpIJCFfzfoZ9zsCZIZv%2F51JCnb1fY8RlntVwpHb49chCqnO0UgJJ%2BuxJXuIALMENH28X3XMsqn7ow83vCgPY2bgsfeyZwCchRzM%2F68u0rdhUnXMr7qFQIokSA%2Fla0B8zGuyaw%3D
Thomas C - MSFT | Specialista del supporto della community Microsoft