Home Excel - Downloads / Areas Restritas Excel VBA - Comentarios

Excel VBA - Comentarios

  • - Acesso Livre
  • Documentos

    Ordenar por : Nome | Data | Acessos [ Descendente ]

    Excel planilha vba comentaios eventos workbook_sheetsChange Excel planilha vba comentaios eventos workbook_sheetsChange

    popular!
    Adicionado em: 04/04/2012
    Modificado em: 04/04/2012
    Tamanho: Vazio
    Downloads: 871

    Escola Saberexcel VBA Estudos - Treinamentos com Macros Fórmulas e Funções.

    Esse procedimento do Aplicativo Microsoft Excel VBA, com evento Workbook_SheetsChange, afeta todas as folhas de planilhas e formata os comentarios já inseridos, mudando a cor de fundo para verde, fonte estilo Castellar, somente maiusculas, na cor vermelho e também insere umm shapes formatando o Comentario como um cruz retangular. Essa página é para nos auxiliar na nossa (69º - Video Aulas - Microsoft Excel VBA),
    '- - - - - - - - - - - - - - - - - - - - - - - - - - -
    Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Dim Wst As Worksheet, Cmt As Comment

    For Each Wst In Worksheets
    For Each Cmt In Wst.Comments
    Cmt.Shape.OLEFormat.Object.AutoSize = True
    ' Para mudar a Cor da Fonte
    Cmt.Shape.TextFrame.Characters(Pos, Len(Saberexcel)).Font.ColorIndex = 3 'vermelho

    With Cmt.Shape.OLEFormat.Object.Font
    .Name = "castellar" 'mudar a fonte
    .Size = 10 'mudar o tamano da fonte
    End With

    Cmt.Shape.OLEFormat.Object.ShapeRange.Fill _
    .ForeColor.SchemeColor = 42 'indice da cor de fundo

    With Cmt
    .Visible = False
    .Text Text:="Escola Saberexcel VBA Estudos®:" & Chr(10) & "Treinamentos com Macros, Fórmulas e Funções"
    .Shape.AutoShapeType = msoShapeCross
    .Shape.Shadow.Type = msoShadow12
    .Shape.Shadow.ForeColor.SchemeColor = 10
    .Shape.Shadow.Visible = msoTrue
    .Shape.ThreeD.Visible = msoFalse
    End With
    Next Cmt
    Next Wst
    End Sub


    Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.



    :


    Excel planilha vba comentario numero comentarios Excel planilha vba comentario numero comentarios

    popular!
    Adicionado em: 29/03/2011
    Modificado em: 29/03/2011
    Tamanho: Vazio
    Downloads: 779

    - Saberexcel - o site das Macors

    Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), retorna a quantidade de comentários existente em uma determinada folha de planilha, neste caso em particular, usamos a planilha ativa.

    Sub Contando_Comentarios_planilha()
    Dim vConta_Comentario As Integer
    Dim vCelula As Range
    Dim sbx As String

    ' Sai do procediemtno se não houver comentários na folha de planilha
    vConta_Comentario = 0

    For Each vCelula In ActiveSheet.UsedRange
    On Error Resume Next
    sbx = vCelula.Comment.Text
    If Err = 0 Then vConta_Comentario = vConta_Comentario + 1
    Next vCelula

    If vConta_Comentario = 0 Then
    MsgBox "Nesta folha de planilha ativa, não há comentários!", vbInformation, "Saberexcel - site das macros"
    Else
    MsgBox "Nesta folha de Planilha existem: [ " & vConta_Comentario & " ] comentarios!", vbInformation, "Saberexcel - site das macros"
    End If

    End Sub




    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel






    Publicidade
    Compre com segurança, garantia e ótimos preços
    Eletrônicos - Submarino.com.br

    Excel planilha vba comentario ocultar mostrar Excel planilha vba comentario ocultar mostrar

    popular!
    Adicionado em: 29/03/2011
    Modificado em: 29/03/2011
    Tamanho: Vazio
    Downloads: 860

    Saberexcel - site das macros

    Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), mostra ou oculta os comentarios da folha de planilha, usando um bottão de alternância (Toggle).

    Sub Ocultar_mostrar_comentarios()

    If Application.DisplayCommentIndicator = xlCommentAndIndicator Then
    Application.DisplayCommentIndicator = xlCommentIndicatorOnly
    Else
    Application.DisplayCommentIndicator = xlCommentAndIndicator
    End If

    End Sub



    Aprenda tudo sobre o AAplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel




    Publicidade
    Compre com segurança, garantia e ótimos preços
    Eletrônicos - Submarino.com.br

    Excel planilha vba comentario seleciona todos Excel planilha vba comentario seleciona todos

    popular!
    Adicionado em: 29/03/2011
    Modificado em: 29/03/2011
    Tamanho: Vazio
    Downloads: 734

    Saberexcel - O site das Macros

    Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), seleciona todas as células que contém comentario na folha de planilha.



    Sub Seleciona_celulas_todos_comentarios()
    Cells.SpecialCells(xlCellTypeComments).Select
    MsgBox ("Todos os comentários selecionados"), vbInformation, "Saberexcel - site das macros"
    End Sub






    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel






    Publicidade
    Compre com segurança, garantia e ótimos preços
    Eletrônicos - Submarino.com.br

    vba comentario ajusta tamanho do comentario selecionado vba comentario ajusta tamanho do comentario selecionado

    popular!
    Adicionado em: 13/12/2010
    Modificado em: 13/12/2010
    Tamanho: Vazio
    Downloads: 803

    {jcomments on}

    vba_comentario_ajusta_tamanho_do_comentario_selecionado


    Essa macro do Aplicativo Microsoft Excel VBA, ajusta comentarios em determinadas células selecionadas
    neste caso o código selecionará os comentarios nas células(D6;E16;G27).
    foi inserido intensionalmente mais algumas fórmulas para auxilar o teste,
    (Aumenta o tamanho do comentário, ao mesmo tempo em que insere dados digitado na célula ativa)

    Sub Auto_ajuste_comentarios_selecionados()
    On Error Resume Next
    Dim Sbx As Range
    Dim vMinhaRange As Range
    [D6,E16,G27].Select
    Set vMinhaRange = Selection
    For Each Sbx In vMinhaRange.Cells
    With Sbx.Comment
    .Shape.TextFrame.AutoSize = True
    End With
    Next Sbx
    vMinhaRange.Select
    [D6].Value = "Ajustando comentario"
    Adiciona_Comentario_com_texto
    End Sub

    Macro auxiliar para o teste de ajuste, aumenta o tamanho
    do comen-tario para realização do teste da macro acima, observem que a macro
    Sub Adiciona_Comentario_com_texto, adiciona o texto da célula D6 no primeiro
    comentário, finalidade didática .

    Sub Alterando_tamanho_teste()
    Dim sb As Object
    For Each sb In ActiveSheet.Comments
    sb.Shape.Width = 144
    sb.Shape.Height = 72
    Next sb
    [D6].Value = "Alterando tamanho para o teste!!"
    Adiciona_Comentario_com_texto
    End Sub

    Essa macro foi usada também como auxiliar ao ser chamada insere os dados da célula(D6) no comentário.

    Sub Adiciona_Comentario_com_texto()
    On Error Resume Next
    [D6].AddComment
    [D6].Comment.Text Text:=[D6].Text
    End Sub


    Aprenda Microsoft Excel VBA com qualidade



    Página 1 de 6

    PROMOÇÃO DIDÁTICOS SABEREXCEL



    Adquira já o Acesso Imediato
    à Area de Membros

    Compra Grantida --- Entrega Imediata

    Aprenda Excel VBA com Simplicidade de 
    códigos e Eficácia, Escrevendo Menos e
    Fazendo Mais.

    '-------------------------------------'
    Entrega Imediata:
    +  500 Video Aulas MS Excel VBA
    +  35.000 Planilhas Excel e VBA
    +  Coleção 25.000 Macros MS Excel VBA
    +  141 Planilhas Instruções Loops
    +  341 Planilhas WorksheetFunctions(VBA)
    +    04 Módulos Como Fazer Excel VBA
    +  Curso Completo MS Excel VBA
    +  Planilhas Inteligentes


    Pesquisa Google SaberExcel

    Publicidade Google

    <script type="text/javascript"><!--

    google_ad_client = "ca-pub-2317234650173689";

    /* retangulo 336 x 280 */

    google_ad_slot = "0315083363";

    google_ad_width = 336;

    google_ad_height = 280;

    //-->

    </script>

    <script type="text/javascript"

    src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

    </script>

    Publicidade

    RSFirewallProtected


    Google Associados

    Depoimentos

    Adicione Saberexcel Favoritos

     
     

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


       Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA