Generic selectors
Exact matches only
Search in title
Search in content

macro program calculates the Channel num

  • This topic is empty.
Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #50804 Reply
    Huawei RF
    Guest

    Dear Friends,

    Here is a VBA macro small program which calculates the number of channels, given the Erlang value and the GoS according to Erlang B table:

    Function Erlangb(traffic As Single, gos As Single)
    Dim top As Single
    Dim bottom As Single
    Dim circuits As Single
    top = 1
    bottom = 1
    circuits = 1
    While (top / bottom) > gos
    top = top * (traffic / circuits)
    bottom = bottom + top
    circuits = circuits + 1
    Wend
    Erlangb = circuits – 1
    End Function

    Sub main()
    x = Erlangb(21, 0.02)
    MsgBox x
    End Sub
    __________________________

    The numbers in the line before the last: x = Erlangb(21, 0.02), represents the Erlang and the GoS respectively.
    You can change them as required and run the program to have the number of channels displayed in a message box.

    Enjoy!!

    #50805 Reply
    NarChai
    Guest

    Thanks for share

    #50806 Reply
    Huawei RF
    Guest

    welcome brother…

    rnp_rno_engineer@yahoo.com

Viewing 3 posts - 1 through 3 (of 3 total)
Reply To: macro program calculates the Channel num
Your information:




<a href="" title="" rel="" target=""> <blockquote cite=""> <code> <pre class=""> <em> <strong> <del datetime="" cite=""> <ins datetime="" cite=""> <ul> <ol start=""> <li> <img src="" border="" alt="" height="" width="">