A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub AddListObject_FromConnection(ByVal UseWorksheet As Worksheet, MyRcd As ADODB.Recordset, strConnName As String, ByVal strCommandTemplate As String, _ ByVal strConnection As String) Dim UseConnection As WorkbookConnection Dim UseQueryTable As Excel.QueryTable Dim UseWorkbook As Workbook = UseWorksheet.Parent On Error GoTo Err UseWorksheet.Cells.Delete() UseQueryTable = UseWorksheet.ListObjects.Add(0, strConnection, True, XlYesNoGuess.xlYes, UseWorksheet.Range("A1")).QueryTable With UseQueryTable .CommandType = XlCmdType.xlCmdSql .CommandText = MyUniversalClass.ReplaceFields_inRcd(strCommandTemplate, MyRcd) .BackgroundQuery = True .Refresh(BackgroundQuery:=False) End With UseConnection = UseWorkbook.Connections("Connection") Dim MyConn As WorkbookConnection = FindConnection(UseWorksheet.Parent, strConnName) If (Not MyConn Is Nothing) Then MyConn.Delete() End If With UseConnection .Name = strConnName .OLEDBConnection.SaveAsODC("\\dtchyb-casf025\c_wbgint_users\u231237\My Documents\My Data Sources\" & strConnName & ".odc") End With Sub_Exit: Exit Sub Err: Select Case Err.Number Case Else Call MyUniversalClass.PrintError(Err, "AddListObject_FromConnection") Resume Sub_Exit Resume End Select End Sub
|How do I only display the rows when a specific background colour appears in any cell across multiple columns||4||35|
|Set the row height to autofit in all workshets and increase that height by 4 points (by means of VBA)||9||29|
|excel conditional formating||4||12|