Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
ListDataFormat property been deprercated?
The following is a section of code from the help file for the "Excel Help
ListData Format" object. Is it just me or does the ListColumn object not have a ListDataFormat property? I'm using Office 2007. Anyone know if this has been deprecated and was just left in the help file? --- Dim objListObject As ListObject Dim objDataRange As Range Dim strListGUID as String Dim strServerName as String strServerName = "http://<servername/_vti_bin" strListGUID = "{<listguid}" Set objListObject = Sheet1.ListObjects.Add(xlSrcExternal, _ Array(strServerName, strListGUID), True, xlYes, Range("A1")) With objListObject.ListColumns(2) Set objDataRange = .Range.Offset(1, 0).Resize(.Range.Rows.Count - 2, 1) If .ListDataFormat.Type = xlListDataTypeText And ..ListDataFormat.Required Then objDataRange.Value = "Hello World" End If End With |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
3rd Party Objects? ListDataFormat property been deprercated?
http://msdn.microsoft.com/en-us/library/bb223935.aspx
says here it is now read only - this field was made hidden in 2007. guess there is no way to set field types now on list objects Does anyone know if there is 3rd Party object that allows you to be able to set field types in excel and push it to sharepoint? "Phil" wrote: The following is a section of code from the help file for the "Excel Help ListData Format" object. Is it just me or does the ListColumn object not have a ListDataFormat property? I'm using Office 2007. Anyone know if this has been deprecated and was just left in the help file? --- Dim objListObject As ListObject Dim objDataRange As Range Dim strListGUID as String Dim strServerName as String strServerName = "http://<servername/_vti_bin" strListGUID = "{<listguid}" Set objListObject = Sheet1.ListObjects.Add(xlSrcExternal, _ Array(strServerName, strListGUID), True, xlYes, Range("A1")) With objListObject.ListColumns(2) Set objDataRange = .Range.Offset(1, 0).Resize(.Range.Rows.Count - 2, 1) If .ListDataFormat.Type = xlListDataTypeText And .ListDataFormat.Required Then objDataRange.Value = "Hello World" End If End With |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Get Property value of class instance by passing string property name | Excel Programming | |||
Runtime error 380 - Could not set the list property. Invalid property value. | Excel Programming | |||
Could not set the ControlSource property. Invalid property value error | Excel Programming | |||
Runtime Error 380 – Could not set the list property. Invalid property value | Excel Programming | |||
Runtime error 380: Could not set the List property. invalid property value of listbox | Excel Programming |