Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Deslocar Parte da L...
 
Notifications
Clear all

Deslocar Parte da Linha Pra baixo

 
2024 - VBA & Macros
Post Recente por Necron 10 anos atrás
4 Posts
3 Usuários
0 Reactions
1,123 Visualizações
RSS
 Victorhfo
(@victorhfo)
Posts: 0
New Member
Topic starter
 

Galera bom dia,

Eu estou com uma duvida gigantesca, o que acontece. Eu tenho um codigo numa coluna do meio e de acordo com ele eu preciso deslocar ou a linha da direita ou a linha da esquerda pra baixo.
Por exemplo: Se Cod 01 descer as linhas da equerda

Dezembro Novembro
Nome Fornecedor Valor COD 01 Nome Fornecedor Valor

I
I
v
Dezembro Novembro
Cod 01 Nome Fornevedor Valor
Nome Fornecedor Valor

 
Postado : 16/01/2015 10:34 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Eu lhe sugiro que você poste seu arquivo modelo para que o pessoal possa lhe ajuda.

Att

 
Postado : 16/01/2015 10:38 am
 Victorhfo
(@victorhfo)
Posts: 0
New Member
Topic starter
 

Uma imagem da planilha, eu quero que onde estiver escrito Conc ele chegue a esquerda da culuna amarela 1 linha pra baixo e nao mude a planilha a direita

 
Postado : 16/01/2015 10:56 am
 Necron
(@necron)
Posts: 117
Estimable Member
 

Sem exemplo da uma complicada! Mas se eu entendi bem, esse codigo te ajuda:

Sub TESTE()

Dim UL As Long
Dim LINHA As Long

UL = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row

    For LINHA = 2 To UL
        If Range("H" & LINHA).Value = "CONC" Then
            Range("A" & LINHA & ":G" & LINHA).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
        End If
    Next LINHA


End Sub
 
Postado : 16/01/2015 12:08 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico