Navision Automation - Excel Hyperlink Issue

tarkmyler
tarkmyler Member Posts: 57
edited 2013-03-20 in NAV/Navision Classic Client
I am creating an Excel shipment list using the Navision automation controller. UPS Worldship writes shipment data to a Navision table. For key customers I use the automation controller to build and email a spreadsheet with shipment data. One of the cells has a hyperlink to UPS package tracking. Because of the shipment volume other solutions like UPS Quantum View are less desireable.

However, I have an issue:

In VBA this is the code used to make a hyperlink in Excel "live".

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
"http://wwwapps.ups.com/etracking/tracking.cgi?TypeOfInquiryNumber=T&InquiryNumber=1ZXXX0300346748046" _
, TextToDisplay:= "1ZXXX0300346748046"

I haven't been successful translating this into Navision and am stuck putting the text of the hyperlink into a cell and having the user edit the cell to "activate" the address data. Does anyone know how to make this work using the Navision automation controller?
Mark Tyler
Pacific City, OR

Comments

  • Savatage
    Savatage Member Posts: 7,142
    I'm not sure i read this correctly.

    Do you want the excel link to work or are you trying to import the tracking # into navision & say on the push of a package button "Track Package" type of thing??
    tarkmyler wrote:
    I haven't been successful translating this into Navision
    HYPERLINK(STRSUBSTNO(ShippingAgent."Internet Address","External Tracking No."));
    ShippingAgent."Internet Address” is

    http://wwwapps.ups.com/WebTracking/proc ... &tracknum=%1
    Harry Ruiz
    http://www.BiloBeauty.com
    http://www.autismspeaks.org
  • tarkmyler
    tarkmyler Member Posts: 57
    Ok. I'm a little embarassed now. How about...

    Range("A1").Value := '=HYPERLINK("[link]","[Friendly Name]")';

    :oops:
    Mark Tyler
    Pacific City, OR
  • hradilik
    hradilik Member Posts: 2
    tarkmyler wrote:
    I am creating an Excel shipment list using the Navision automation controller. UPS Worldship writes shipment data to a Navision table. For key customers I use the automation controller to build and email a spreadsheet with shipment data. One of the cells has a hyperlink to UPS package tracking. Because of the shipment volume other solutions like UPS Quantum View are less desireable.

    However, I have an issue:

    In VBA this is the code used to make a hyperlink in Excel "live".

    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
    "http://wwwapps.ups.com/etracking/tracking.cgi?TypeOfInquiryNumber=T&InquiryNumber=1ZXXX0300346748046" _
    , TextToDisplay:= "1ZXXX0300346748046"

    I haven't been successful translating this into Navision and am stuck putting the text of the hyperlink into a cell and having the user edit the cell to "activate" the address data. Does anyone know how to make this work using the Navision automation controller?

    I had the same problem and I solved it as follows:

    XlWorkSheet.Hyperlinks.Add(XlWorkSheet.Range(xlColID + xlRowID), "Hypertext Address");
    (first parameter must be object)

Categories