Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Alterar tamanho da ...
 
Notifications
Clear all

Alterar tamanho da fonte

 
2024 - VBA & Macros
5 Posts
3 Usuários
0 Reactions
1,020 Visualizações
RSS
 ser_ourico
(@ser_ourico)
Posts: 13
Eminent Member
Topic starter
 

Pessoal, bom dia!
Não estou conseguindo resolver o erro deste código. Dá pau na linha que tem a função Range, para alterar o tamanho da fonte.

Range("F6:I9").Select
ActiveWorkbook.Worksheets("Resultado_Diario").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Resultado_Diario").Sort.SortFields.Add Key:=Range("G7:G9"), _
SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Resultado_Diario").Sort
.SetRange Range("F6:I9")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("F7:I7").Font.Size = 14
Range("F8:I8").Font.Size = 12
Range("F9:I9").Font.Size = 11

Obrigado pela ajuda.

 
Postado : 02/10/2015 7:21 am
 MPrudencio
(@mprudencio)
Posts: 0
New Member
 

Disponibilize o codigo com o arquivo assim fica mais facil ajuda-lo

 
Postado : 02/10/2015 7:46 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Seria melhor postar seu arquivo modelo com o código completo!!
Ou leia..
http://www.functionx.com/vbaexcel/cells/Lesson2.htm

Att

 
Postado : 02/10/2015 7:47 am
 ser_ourico
(@ser_ourico)
Posts: 13
Eminent Member
Topic starter
 

Segue o arquivo.
Só estou utilizando a macro Classificar.
A outra ainda vou fazer, onde quero copiar as linhas do resultado diario sequencialmente na planilha "."

Resultado Diário_DESENVOLVENDO.xlsm
 
Postado : 02/10/2015 8:56 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

A guia "Resultado_Diario" deve está desprotegida (manualmente ou via VBA), para que o código funcione!

Para fazer via VBA leia:
http://cse.google.com.br/cse?cx=partner ... gsc.page=1

Att

 
Postado : 02/10/2015 9:50 am
Forum Jump:
  Tópico Anterior
Próximo Tópico