macro para ordenar linhas num intervalo que contem botões com macros

Question

Tenho uma lista com nomes à frente de cada nome tenho dois botões de formulários associados a macros, pretendia fazer uma macro que me ordenasse alfabeticamente as linhas mas que os botões acompanhassem essa ordenação. Na parte superior tenho um botão "Ordenar" para associar a essa macro, que ao clicar nele ordenasse, e o intervalo de ordenação é A6:Z105.

Se houver forma de anexar o ficheiro, era mais fácil para entenderem o que pretendo, se isso for possivel expliquem-me como fazer

Aurgência é inimiga da perfeição, o certo é que estou mesmo a necessitar disto.

Fransil

Answer 1

Para atribuir uma macro a um controle, consulte esse link: http://www.ambienteoffice.com.br/excel/controles_de_uma_planilha/

Conseguiu resolver seu problema?

Answer 2

Atribua a macro a seguir no botão:

Sub Ordenar()

    With ActiveSheet.Sort

        .SetRange Range("A6:Z105")

        .Header = xlNo 'Se a linha 6 for cabeçalho, troque xlNo por xlYes

        .Apply

    End With

End Sub

Answer 3

<!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} @page Section1 {size:612.0pt 792.0pt; margin:70.85pt 3.0cm 70.85pt 3.0cm; mso-header-margin:36.0pt; mso-footer-margin:36.0pt; mso-paper-source:0;} div.Section1 {page:Section1;} -->

Boas Filipe

Alterei o meu ficheiro e resumi para 9 nomes sendo assim mais fácil de entenderem o pretendido. Também atribui cores para uma melhor observação.

Recapitulando:

Queria ordenar um intervalo de células "B6:Z105" pela coluna B e coloquei um botão "ordenar" para atribuir uma macro, nesse intervalo contém botões com macros que não ordenam junto com as linhas e era isso que pretendia.

Como a linguagem do Excel nem sempre é igual agradecia se possível que alterassem o ficheiro, para depois eu ver como foi feito e colocar no meu.

no link está o exemplo.

Abraços

Fransil

http://www.4shared.com/document/-rq17Lxz/Lista\_de\_Clientes\_-\_Exemplo.html

Answer 4

<!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0cm; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} @page Section1 {size:595.3pt 841.9pt; margin:70.85pt 3.0cm 70.85pt 3.0cm; mso-header-margin:35.4pt; mso-footer-margin:35.4pt; mso-paper-source:0;} div.Section1 {page:Section1;} -->

Boas Filipe

Pensando melhor, e como a vossa linguagem é diferente da minha, há agmuna possibilidade de fazeres um exemplo só com dois nomes na linha B6e B7 e colocares dois botões um na linha D6 e D7, e outro na linha F6 e F7, assim era mais fácil para eu ver como fizeste para colocar no meu ficheiro.

Obrigado

Answer 5

Viva Filipe

Sou um pouco inexperiente nesta coisas, podias dizer onde coloco esse código, e como atribuo  ao botão ordenar, se faz o favor, pelo que vi o intervalo está correto e começa nea linha 6.

Abraços