Pergunta : Resultado da exposição do vb de Excel de um varable em um msgbox

Olá! peritos,

I que tenta escrever um macro (ver abaixo) para calcular a porcentagem da conclusão. Eu estou começ compilo erros com a ajuda do pedido da função do msgbox com sintaxe. Agradecer para seu

Dim OpenDisc de help.

Sub InspectionCompletion () como Double
Dim PagesBOW como Double
Dim InspCom como Double
Dim TotalDisc como Double

OpenDisc = CDbl (InputBox (“incorporar quantos artigos abertos estão na CURVA: "))
PagesBOW = CDbl (InputBox (“incorporar o número de páginas da CURVA: "))
TotalDisc = (PagesBOW) * 8
InspCom = (((TotalDisc) -) (de OpenDisc/(TotalDisp)) *)
MsgBox = ((InspCom), o vbDefaultButton1, “Percentage da conclusão da inspeção é: ”, o)
End Sub
 class= do

Resposta : Resultado da exposição do vb de Excel de um varable em um msgbox

ou usando o formato
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

InspectionCompletion secundário ()

OpenDisc não ofuscante como o dobro
PagesBOW não ofuscante como o dobro
InspCom não ofuscante como o dobro
TotalDisc não ofuscante como o dobro

OpenDisc = CDbl (InputBox (“incorporar quantos artigos abertos estão na CURVA: "))
PagesBOW = CDbl (InputBox (“incorporar o número de páginas da CURVA: "))
TotalDisc = (PagesBOW) * 8
InspCom = () de TotalDisc - de OpenDisc/TotalDisc
Porcentagem de MsgBox a “da conclusão da inspeção é: ” & formato (InspCom, “por cento”)
Submarino da extremidade
Outras soluções  
 
programming4us programming4us