Pq ja nao mantem do tamanho desejado ?

Configurações de pagina é mais funcional se ja deixar da forma desejada.

Ola Marcelo, fico grato pela orientação é que na verdade eu tenho este link onde faço um relatorio onde a formatação esta dentro das linhas onde ocorre as quebras e isso dificulta deixar o tamanho da coluna padronizada, este o relatorio que estou criando conforme o link
viewtopic.php?f=10&t=28287
se puder me ajudar, agradeceria, abraço

Sub Macro1()

    Columns("B:B").ColumnWidth = 31.43

End Sub

Cinco dicas que foram muito úteis para mim:

1) Quando não sei fazer algo no VBA, vou ao menu EXIBIÇÃO >> MACROS >> GRAVAR MACRO
Faço o que eu quero aí volto ao menu EXIBIÇÃO >> MACROS >> PARAR GRAVAÇÃO
Aperto Alt + F11 e vejo como a macro fez aquilo. Tento entender e tento adaptar.

2) Quando vou criar um código e o resultado não está saindo como o esperado, entro no código e vou apertando F8 para executar passo a passo, aí vou passando o mouse sobre as variáveis para verificar se o valores delas estão corretos, já consertei milhares de códigos dessa forma.

3) Antes de executar o código, vou ao menu Depurar >> Compilar. Isso ajuda a corrigir erros mais simples, como o nome de uma variável digitado errado.

4) Declaro todas as variáveis. Isso também evita erros.

5) Sempre uso o Option Explicit lá no início. Ele me obriga a declarar as variáveis.

Ola Klarc
muito grato pelas dicas, vou aprendendo com suas orientações, abraço
Fiz alguns ajustes no codigo conforme minhas necessidades

Sheets("TabVendasSorting").Cells(LINHATAB, 22).Copy Destination:=Sheets("Relatorios").Cells(LINHAREL, 3)
     Sheets("Relatorios").Cells(LINHAREL, 3).ColumnWidth = 30
     Sheets("Relatorios").Cells(LINHAREL, 3).RowHeight = 34
     Sheets("Relatorios").Cells(LINHAREL, 3).HorizontalAlignment = xlLeft