1. Welcome to CAST's newly designed and improved Forum

    Log in or Sign up and share the knowledge!

    Dismiss Notice

Export Patch to ETC EOS

Discussion in 'Tips & Tricks!' started by Floriaan, May 5, 2020.

  1. Floriaan

    Floriaan Well-Known Member

    Joined:
    Feb 13, 2015
    Messages:
    385
    Likes Received:
    81
    Here is a very dirty way to export the patch from Wysiwyg into an ETC EOS Console with the help of Microsoft Excel.

    [EDIT] It might need a little polishing, so let me know if this works on your set-up and find a way to improve or streamline this a bit more.

    There are a few steps you need to do, so only do this with large shows, where it would be a lot of work to type everything twice.

    You need:

    - Wysiwyg
    - Microsoft Excel (with macro's activated)
    - ETC EOS offline or online version 2.7 or higher


    Step 1:

    Patch your show as you would usually do



    Step 2:

    - In DATA view make a new Columns Shortcut
    - Open View Options>Data Options
    - Add ONLY the following Columns in this order:
    Channel, Spot, Type, Purpose, Color, Patch Universe, Patch Address

    If you plan to do this more often you can put it in your wysiwyg template (.wyt)
    Please see the attached Wysiwyg to EOS.wyg file for an example.


    Step 3:

    - Select this sheet

    - Choose File>Export>Worksheet

    - Make sure you choose the .xls file format

    - Make sure you check the "Use standard English headers" checkbox



    Step 4:

    - Open the exported file in Excel


    [Only first time]

    - In Excel make sure you have macro's activated (In security settings) and Developer menu's activated in Ribbon settings.
    - Now press “Alt-F11” to open the VBA editor. Click “File” and then “Import File” on the menu bar. Browse to the attached "Wysiwyg to EOS Excel Macro.BAS" file.
    - Highlight the first Module and hit F7. Now copy copy and paste the code at the bottom of this post into Module 1.

    If you plan to use this macro more often, save this macro to your PERSONAL macro's so you can use it from every excel file you open.


    - Run the Macro

    - Save the file as a new file with the Fileformat "Text with MS-DOS format"

    A text file gets saved as if it were saved as an export from Lightwright to EOS.



    Step 5:

    - Open a new show in EOS

    - From the Filebrowser in the CIA choose Import from Lightwright

    - Select the txt file that you just created in Excel

    - Make sure the right columns are imported (see screenshot)
    Lightwright to EOS column headers.png


    - Make sure you associate the Fixture types from Wysiwyg into Fixture types from the EOS library by clicking [MAP DEVICES] (see screenshot)

    Schermafbeelding 2020-05-03 om 18.13.53.png

    - Choose [DONE] when you did this for every fixture (this is persistent for future imports, including fixture mode)

    - Now click OK to import the file





    Code:
    Sub ExporttoEOS()
    ' Export_to_EOS Macro
    ' Export wysiwyg output from Datasheet "Lightwright Export" to ETC EOS console import from Lightwright
    
    ' Inserts a column for Channel to merge Spot and Channel
    ' numbers into
    ' Renames column headers
    ' Adds a formula to translate patch universes and
    ' patch addresses to absolute DMX addresses
    ' Change formula's to values
    
    Dim sht As Worksheet
    Dim LastRow As Long
    
    Set sht = ActiveSheet
    
    Columns("A").Insert
    
    Range("A1").Value = "Channel"
    Range("B1").Value = "Conventional"
    Range("D1").Value = "Instrument Type"
    Range("I1").Value = "Formula"
    Range("J1").Value = "Dimmer"
    
    LastRow = sht.Cells.Find("*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row
    Range("A2:A" & LastRow).Formula = "=B2&C2"
    Range("I2:I" & LastRow).Formula = "=(G2-1)*512"
    Range("J2:J" & LastRow).Formula = "=SUM(H2+I2)"
    
    Dim rng As Range
    
        For Each rng In ActiveSheet.UsedRange
    
            If rng.HasFormula Then
    
                rng.Formula = rng.Value
    
            End If
    
        Next rng
    
    End Sub
    
     

    Attached Files:

    #1 Floriaan, May 5, 2020
    Last edited: May 7, 2020
    Steve Martin and Jason Gardash like this.
  2. Floriaan

    Floriaan Well-Known Member

    Joined:
    Feb 13, 2015
    Messages:
    385
    Likes Received:
    81
    I've made a change to the code for the macro above. It works more reliably if the Column header for the Address is named Dimmer in the text file. EOS does not like to remap that column in all cases apparently.
     

Share This Page