Questione : Risultato dell'esposizione del vb di Excel di un varable in un msgbox

Ciao esperti,

I che prova a scrivere una macro (vedere sotto) per calcolare la percentuale di completamento. Sto ottenendo compilo gli errori con l'aiuto di richiesta di funzione del msgbox con sintassi. Ringraziare per il vostro

Dim OpenDisc di help.

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

OpenDisc = CDbl (InputBox (“entrare nel quanti articoli aperti sono sull'ARCO: "))
PagesBOW = CDbl (InputBox (“fornire il numero delle pagine dell'ARCO: "))
TotalDisc = (PagesBOW) * 8
InspCom = (((TotalDisc) -)/((di OpenDisc TotalDisp)) *)
MsgBox = ((InspCom), il vbDefaultButton1, “Percentage di completamento di controllo è: „, o)
End Sub
 class= del

Risposta : Risultato dell'esposizione del vb di Excel di un varable in un msgbox

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

InspectionCompletion secondario ()

OpenDisc fioco come doppio
PagesBOW fioco come doppio
InspCom fioco come doppio
TotalDisc fioco come doppio

OpenDisc = CDbl (InputBox (“entrare nel quanti articoli aperti sono sull'ARCO: "))
PagesBOW = CDbl (InputBox (“fornire il numero delle pagine dell'ARCO: "))
TotalDisc = (PagesBOW) * 8
InspCom = ()/TotalDisc di OpenDisc - di TotalDisc
La percentuale di MsgBox “di completamento di controllo è: „ & disposizione (InspCom, “la percentuale„)
Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us