Posts

Showing posts from June, 2019

Revit export shared parameters from Excel

So load your parameters file into excel but the export needs to remove null tabs at the ends. Attribute VB_Name = "REVIT_EXPORT_PARAM_LIB" ''©2021 Ron E. Allen- Shared with KTGY2018-2019 - All rights reserved ''©2023 Ron E. Allen- Shared with WareMalcomb2019-2023 - All rights reserved Option Explicit Const VBQT = """" Sub REVIT_Shared_Params_EXPORT () Dim ws As Worksheet Dim objTxtFile As TextStream ''As Integer Dim filepath As String Dim strN As String Dim nRow As Integer Dim ncol As Integer Dim RowMax As Integer Dim ColMax As Integer Dim RColmax As Integer Dim strLine As String Dim strFmt As String Dim obj Dim CheckGroup As Range Dim GroupID_START As Integer Dim GroupID_END As Integer Dim FSO As FileSystemObject Dim objFile As File Dim curDate As Date Dim newDate As Date Dim boolParams As Boolean If MsgBox ( "This exports the