WorksheetFunction.Bitrshift (Excel)

Retorna um número de valor deslocado à direita por shift_amount bits.

Bitrshift (Arg1, Arg2)

Dim dblArg1 As Double: dblArg1 = 
Dim dblArg2 As Double: dblArg2 = 
Dim dblBitrshift As Double
dblBitrshift = WorksheetFunction.Bitrshift(Arg1:=dblArg1, Arg2:=dblArg2)

Arguments

Arg1 (Double) - A representação decimal do número binário que você deseja avaliar.

Arg2 (Double) - O número de bits que você deseja mover arg1 à direita.