Counting a Specific value within a column

See also questions close to this topic

• Text and numerical values in pivot tables in Excel

  I have a table in Excel that looks like this:

    Name      QuestionID      Answer
    A         1               Shoes
    B         1               Coats
    A         2               1983
    B         2               1978
  

  I want to create a table that Looks like this:

    Name        1        2
    A          Shoes     1983
    B          Coats     1978   
  

  I've tried creating a pivot table, where "Name" is the row, "QuestionID" is a column, and "Answer" is the value. But values need to be aggregated, so I wind up with something numerical, instead of just the text or numbers in "Answers." I'm not clear on how to just display just the values, and not some processed version of the values.

  Any help would be really appreciated!
• Better way to Vlookup

  I would like to know if there is a better alternative to Vlookup to find matches between two cells (or Python Dfs).

  Say I have the below Dfs,

  I want my code to check if the values in DF1 was in DF2, If values exactly match OR if the values partially matche return me the value in the DF2.

  Just like the matches in 4th column Row 2,3 returned values.

  Thanks Amigo!
• Update a table data link in AutoCAD using VBA

  I have an issue, have an AutoCAD file with a ton of data links and would like to update only the data links related to a speciffic table. Simmilar to the functionality of selecting a table with data links, right clicking and selecting Update Table Data Links.

  i have the following code:

  Private Sub Update_table_data_link(tblRef As AcadTable)
  
  ThisDrawing.SendCommand "DATALINKUPDATE" & vbCr & "U" & vbCr & "K" & vbCr
  
  End Sub
  

  It works but updates all the data links in the drawing (which is a problem) so a perfect solution would either let me get what links are associated to tblRef
  and change the line to:
  ThisDrawing.SendCommand "DATALINKUPDATE" & vbCr & "U" & vbCr & "D" & vbCr & "datalink_name_from_tblRef" & vbCr

  or directly send the command to update the links to tblRef
• Different pivot tables to different emails vba

  I have multiple pivot tables that I want to send out individually to different emails. The problem is, the email keeps getting written over by the second email. Each pivot table is named different and the code works fine with only one reference. I have tried multiple ways to get it but cant. Can someone help?

  Private Sub Workbook_Open()
  Dim wk As Worksheet
  Dim wk1 As Worksheet
  wk = Worksheets("EPSICAR")
  wk.Connections("owssvr").Refresh
  wk1 = Worksheets("PastDue")
  wk1.RefreshAll
  
  End Sub
  
  Sub pastdue()
  
  Dim myApp As Outlook.Application, mymail As Outlook.Mailitem
  Dim Lap As Object
  Dim rng As Range
  Dim rngmtl As Range
  Dim Mailitem As Object
  
  Set myApp = New Outlook.Application
  Set mymail = myApp.CreateItem(olMailItem)
  Set rng = Sheets("PastDue").PivotTables("Q Group Past 
  Due").TableRange1
  Set rngmtl = Sheets("PastDue").PivotTables("Mtl Group Past 
  Due").TableRange2
  
  With mymail
  .To = "sponge.bobh@12345.com"
  .CC = "pat.star@12345.com"
  .Subject = "ICAR/EPS past due"
  .HTMLBody = "The following are a list of ICARs/EPS that are past due" & 
   RangetoHTML(rng)
  .Display
  '.send
  
  
  With mymail
  .To = "blue.berry@12345.com"
  .CC = "black.berry@12345.com"
  .Subject = "ICAR/EPS past due"
  .HTMLBody = "The following are a list of ICARs/EPS that are past due" & 
  RangetoHTML(rngmtl)
  .Display
  '.send
  
  
  
  Set myApp = Nothing
  Set mymail = Nothing
  End With
  End With
  
  
  End Sub
  
  Function RangetoHTML(rng As Range)
  Dim fso As Object
  Dim ts As Object
  Dim TempFile As String
  Dim TempWB As Workbook
  
  TempFile = Environ$("temp") & "/" & Format(Now, "dd-mm-yy h-mm-ss") & ".htm"
  
  rng.Copy
  Set TempWB = Workbooks.Add(1)
  With TempWB.Sheets(1)
      .Cells(1).PasteSpecial Paste:=8
      .Cells(1).PasteSpecial xlPasteValues, , False, False
      .Cells(1).PasteSpecial xlPasteFormats, , False, False
      .Cells(1).Select
      Application.CutCopyMode = False
      On Error Resume Next
      .DrawingObjects.Visible = True
      .DrawingObjects.Delete
      On Error GoTo 0
  End With
  
  With TempWB.PublishObjects.Add( _
       SourceType:=xlSourceRange, _
       Filename:=TempFile, _
       Sheet:=TempWB.Sheets(1).Name, _
       Source:=TempWB.Sheets(1).UsedRange.Address, _
       HtmlType:=xlHtmlStatic)
      .Publish (True)
  End With
  
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set ts = fso.GetFile(TempFile).OpenAsTextStream(1, -2)
  RangetoHTML = ts.ReadAll
  ts.Close
  RangetoHTML = Replace(RangetoHTML, "align=center x:publishsource=", _
                        "align=left x:publishsource=")
  
  TempWB.Close savechanges:=False
  Kill TempFile
  
  Set ts = Nothing
  Set fso = Nothing
  Set TempWB = Nothing
  End Function
  
• How to open an access database from the VBA in a Word Macro

  All is explained in the title.

  I need to be able to run a macro in word that opens up an access database.
• VBA: Delete Rows based on a column of cell values

  Im still new to VBA. I would like to delete my data row based on a column of data from another sheet.

  I have a sheet of data name: WorkingData Workingdata is a list of database with ProductIDs which is under Column A The productIDs would exist more than once because it is identified by period.

  I have a external sheet name: IDs to exclude In the Sheets("IDs to exclude") under column A, there is a list of IDs to exclude because they are unclean data. However, every month the list will keep adding up so the range has to identify the last row.

  Please and thank you!
• How to find value in all sheets based on the user input and update the cell

  I have a excel file with 142 sheets. All sheets have same table but different value but same ID. I want to update it so that, it can effect all the sheets that have the same ID.

  Example I want to update value in the column title Efficiency for ID = 2.

  I want to make a form in excel that have the text box that allow me to input the ID, input the column title and input the value that I want to update.

  It will update all sheets according to the requirements.

  Is this possible ?
• Copy Chart from Excel to Word Bookmark

  Apologies I am new to Visual Basic and I have been struggling with this for a while. I am trying to copy a chart from excel to a word document bookmark, but it just pastes the chart on the first paragraph of page 1.

  I am wanting the chart to paste to a bookmark, Name = "Chart_Location", located at the beginning of page 2, of the word document. Any help would be greatly appreciated.

  Thanks