utilizzare Visual Basic, Applications Edition (VBA ) di script per eseguire le attività e calcoli complessi in Microsoft Office . VBA è dotato di 11 built- in funzioni di conversione di tipo , che è possibile utilizzare per cambiare numeri da uno notazione all'altra . Nessuna di queste funzioni , tuttavia , in grado di convertire i numeri decimali in binario. Il sistema decimale utilizza potenze di 10 per ricavare cifre; il sistema binario , invece , utilizza potenze di due . Utilizzare questo principio per creare un convertitore da decimale a binario in VBA . Istruzioni
1
avviare Microsoft Word o Microsoft Excel . Premere "Ctrl" e "N" per creare un nuovo file .
2
Premere " Alt " e " F11 " per aprire l'editor di Visual Basic (VBE ) .
< Br > 3
pulsante destro del mouse sul nome del progetto VBA nel pannello " Gestione progetti " . Fare clic su "Inserisci" e selezionare "Modulo ". Questo aggiunge " Modulo1 " alla lista .
4
Fare doppio clic su " Modulo1 ". Inserire il codice seguente nella " finestra del codice : "
Sub Conv2Bin ( ) per
Dim istr As String
Dim i As Long
i = Application . InputBox ( _
Prompt : = "Digitare il numero che si desidera convertire e fare clic su OK . " , _
Title : = " Converti in binario " , _
tipo: " . " = 1 ) per
istr = CStr (i ) per
b = CBIN (i ) per
MsgBox "Hai inserito " & ISTR & & Chr ( 13 ) & Chr ( 13) _
& " Il suo valore binario è " & Chr ( 13) & B