Jump to content
Fórum Script Brasil
  • 0

Porcentagem em Listview


Matavelli
 Share

Question

Olá.

Estou tentando exibir os dados de uma planilha em um Listview, porém os campos que contem números em porcentagem são exibidos como 0,2 , 0,3 etc.

Meu código está assim: 

Range("a6").Select  'celula inicial
While ActiveCell <> ""  'enquanto não encontrar uma linha vazia, continuar a executar o loop
Set linha = ListView1.ListItems.Add(Text:=Sheets("Austria").Cells(lin, 1).Value) 'Product Group
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 2).Value 'Part Number
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 3).Value 'Product Name
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 4).Value 'Version
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 5).Value 'PIM 2015
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 6).Value 'VAT
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 7).Value 'POM
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 8).Value 'Dealer Rebate
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 9).Value 'NHEK
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 10).Value 'SA
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 11).Value '3NHEK
    linha.ListSubItems.Add Text:=Sheets("Austria").Cells(lin, 12).Value 'PUG - Master Price List

A linha em negrito seria a coluna que deve exibir a porcentagem.

Sou iniciante no assunto, alguém poderia me dar uma ajuda nisso?

Muito obrigado!!

 

Link to comment
Share on other sites

3 answers to this question

Recommended Posts

  • 0

Amigo,

Vamos "enganar o vba", tente da seguinte forma:

linha.ListSubItems.Add Text:=Round(Sheets("Austria").Cells(lin, 6).Value * 100, 2) & "%" 'VAT

O vba interpreta "20%" em forma decimal, retornando 0,2 no caso. O comando Round(valor,quantidade de casas decimais) arredonda o valor da célula para somente duas casas decimais de acordo com o exemplo evitando que seu listview exiba uma possível dizima periódica, sendo assim estamos multiplicando o valor da célula por 100 para termos o percentual e arredondando para duas casas decimais e após isto estamos incrementando o "%".

Qualquer duvida é só chamar..

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Forum Statistics

    • Total Topics
      149.6k
    • Total Posts
      646.2k
×
×
  • Create New...