# Combining COUNTIF And AND Functions

Jul 6, 2006The format for combining COUNTIF and AND in a

single function - I can't seem to get the format right.

What I want to do is COUNTIF range 'Issued_by' = A8 AND range

'Period_all' = 1

The format for combining COUNTIF and AND in a

single function - I can't seem to get the format right.

What I want to do is COUNTIF range 'Issued_by' = A8 AND range

'Period_all' = 1

ADVERTISEMENT

I am trying to combine the following two function into one cell. The second column contains a "space" before the number. The third column is the result. =CONCATENATE(Q2,",",+R2) and =SUBSTITUTE(K2," ","")

Here is a sample table with showing the data and result

4

5L

4,5L

5

6R

5,6R

5

7L

5,7L

6

10R

6,10R

6

3L

6,3L

I roughly know what my equation should look like, but it keeps failing. Its all part of a wider spreadsheet but I will only put down that bits that impact this part of the sheet.

In my cell I need it to input a value from a different spreadsheet. The input value is text.

I currently use this formula and it works perfectly for what I need.

=(OFFSET(INDIRECT("sheet2!D"&$A7),R$6,25,1,1))

This would a return a variety of results such as "excluded","compliant","non-compliant".

I would like to arrange an IF function so that if the answer is Excluded to keep it as Excluded. But anything else to use this formula instead.

=(OFFSET(INDIRECT("sheet2!D"&$A7),(R$6-2),25,1,1))

Say I have written three user defined functions: first(a,b,c); second(a,b,c);third (a,b,c), which all give value for a,b,c inputs. How do I write a VBA program that uses the functions above? Say the code is called Combine(), after the user have typed in the value of a,b,c, the function Combine=first+second+third.

View 4 Replies View RelatedExcel 2007

I am trying to count how many cells have the last 2 digits of 84 or less. I tried this formula, but it is not working.

=COUNTIF(RIGHT(H4:H129,2),"

I'm trying to create a report to show daily statistics for internet traffic. I have a large table showing a daily breakdown of performance, a table showing combined cost for all "Mondays", "Tuesdays" etc in the month and I also want a table to show the "average" performance for a typical "Monday", "Tuesday" etc.

The report will be used on a daily basis and I realised that until there is a full compliment of data the daily averages table would be inaccurate as it will be dividing the overall total for each day by the total number of occurances each day has in a typical month. This is wrong because if we are only halfway through the month then we will be dividing by days that haven't arrived yet.

I need to create a formula that counts the number of times that an age range appears within a column. In column G, there is a list of ages based on a demographic collection. The ages range from 13 to 50+. I want to designate another cell to count the number of times the characters between 13 and 18 occur within that column. I have =COUNTIF(G8:G20,"13") How do I add "14", "15", "16", "17", and "18"?

View 2 Replies View RelatedI have this formula

= COUNTIF(AT6:AY6,"F")+COUNTIF(AT6:AY6,"P")+COUNTIF(AT6:AY6,"M")+COUNTIF(AT6:AY6,"D")

that returns the number 2 (which is correct). However, if I precede it with

AZ6/COUNTIF(AT6:AY6,"F")+COUNTIF(AT6:AY6,"P")+COUNTIF(AT6:AY6,"M")+COUNTIF(AT6:AY6,"D")

it returns a DIV/0 error, even though AZ6 has a value of 24.

Surely 24/2 would return a value of 12? NB AZ6 cell value is derived from the result of a formula.

I am aware of the following topic in the VBA Help file:

"Using Microsoft Excel Worksheet Functions in Visual Basic

You can use most Microsoft Excel worksheet functions in your Visual Basic statements. To see a list of the worksheet functions you can use, see List of Worksheet Functions Available to Visual Basic.

Note Some worksheet functions aren’t useful in Visual Basic. For example, the Concatenate function isn’t needed because in Visual Basic you can use the & operator to join multiple text values."

And I'm aware of how to call Excel funcitons from within VBA; e.g., answer = Application.WorksheetFunction.Min(myRange)

However, not only are some Excel functions not useful; the fact is they cannot be used because VBA has a native function that does exactly the same thing and you have to use that native VBA function to achieve your goal. It is these overlapping functions that I am especially interested in. I want to know what I should use directly in VBA and what I need to go to Excel for.

I have some code where I use and statements, as follows:

View 4 Replies View RelatedI want to see if a goal has been met and get a "Yes" or "No" so I wrote

=If(A1>=A2),"Yes","No"

But on months not worked where goal and production both equal 0 then I am getting a return of Yes. How can I say is A1 >= to A2, but if both are 0 return N/A?

I am having problems combining AND and OR into a single statement. To start I have a statement =IF(AND(B978="P",R978=0,S978=0),"processed",""). If B=P and R=blank and S=blank then display PROCEED else make blank.

What I want to do is check if S is blank or "N" but when I try to add an OR I get error messages regarding missings )'s =IF(AND(B978="P",R978=0,OR(S978=0,S978="N"),"processed","").

I have two vba the first one records the date & time of a cell change in column a and places this in column b

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("a:a")) Is Nothing Then

Target.Offset(0, 1) = Date & " " & Time

End If

End Sub

The second one is a function to get the User logged in to windows.

Function UNameWindows() As String

UNameWindows = Environ("USERNAME")

End Function

What I really could do with is a way of incorporating the user name in the first function so it records date, time and user?

I have two seperate columns, First Name (Column B) and Last Name (Column C). Is there a way a macro can combine the two into one cell Last Name, First Name.

View 3 Replies View RelatedI am trying to write a UDF function where I lookup if a value is on a range on different sheet. I would like to be able to write what I want the result to be in the function. I also hard coded that the function need 3 range and 3 results, but I know it is possible the make the number of component vary depending on what the user writes. I would like my function to do that.

Here is what I have written so far :

VB:

Function find_para2(var As String, rng As Range, result1 As String, rng2 As Range, result2 As String, rng3 As Range, result3 As String)

If WorksheetFunction.IsNA(WorksheetFunction.VLookup(var, rng.Address, 1, False)) = False Then

find_para = find_para & result1 & ", "

[Code] .....

I need to find a formula to show the time allowed for each person, now they recomend combining 'if' with 'lookup'. now I may be having a blonde moment but I have tried to figure it out for a while now and i am stuck.

View 14 Replies View RelatedTrying to combine Column A (First Name) with Column B (Last Name) Probably very simple.!

View 2 Replies View RelatedI have a big amount of data and want to consolidate it.

I have identical text in Columns 1,3 and 4, but the text in Column 2 is different for all.

How do I make 1 row instead of 3 with Column 2 consolidated?

See the attachment : Excel_list.xlsxâ€Ž

I have a problem in excel that is very urgent to resolve. I have a table that contains duplicate records e.g two people living at same address. I want to merge those records whose address field value is same. Find attached an excel sheet that contains the exact data and the exact output that I want. I know it requires VBA coding.

View 4 Replies View RelatedI have two different bits of code as follows:

View 3 Replies View Relatedok - I have numbers that need to be converted to 12-digit numbers with leading zeros if they are less than twelve digits. for example, 1234567 would turn into 000001234567 to have 12 digits. to do this, i use:

=rept(0,12-LEN(A1))&A1

additionally, i need to strip off the last three digits and replace them with three zeros. my example would now become 000001234000. assuming the result of my first formula (above) is in cell B1, i would use:

=INT(B1/1000)&"000"

Is there a way to combine these two functions into one formula to make this conversion process more painless? Or is there another formula/function I can use that I haven't thought of or do not know?

I'm having a mental block here. I need the below statement to have a max value of (B14*B4) in the instance where

(B17-B19)*0.7 exceeds (B14*B4),

IF(B17-B19

I got 2 macros that I want to run in one go. So to explain:

Here is the data of Sheet1 before the macro is run:

A

B

C

D

E

[Code]....

Keep in mind, when Macro2 is run it puts the data on Column W then X then Y etc as soon as the Column reaches 20 it moves on to the next one.

So my question is:

Is there anyway to combine both macros to just run it once instead of running it individually?

Just starting to learn VBA. I have the 2 following codes.Can they be combined into 1 code.I have 2 buttons one say hide rows and the other button says unhide rows....can 1 button be used and when the rows are visible the button says hide rows and when the rows are hidden the button says unhide rows

Sub hiderows()

ThisWorkbook.Sheets("sheet1").Rows("3:12").Hidden = True

End Sub

Sub unhiderows()

ThisWorkbook.Sheets("sheet1").Rows("3:12").Hidden = False

End Sub

I have two subs which I've been trying to combine into one. Essentially all that is changing is the slicer name and range value.

Here's what I have:

Code:

Private Sub Workbook_SheetPivotTableChangeSync(ByVal Sh As Object, ByVal Target As PivotTable)

Dim cache As Excel.SlicerCache

Set cache = ActiveWorkbook.SlicerCaches("Slicer_Project_Type3")

Dim sItem As Excel.SlicerItem

Dim myString As String

For Each sItem In cache.SlicerItems

If sItem.Selected = True Then

myString = myString & "," & sItem.Name

[code].....

But it's erroring out on me.

how to combine these two codes into one?

Code:

Sub DelTemp()

Dim LR As Long, i As Long

Dim pt As PivotTable

[Code].....

I have two macros that I need to run as one and I am not sure how to call the second macro from within the first. I'm sure it's easy...If you know how... Thank you in advance.

--------------------------------------

macro 1

Sub PrintUsedRange()

'

Dim ws As Worksheet

'

For Each ws In Worksheets

Application.CutCopyMode = False

ws.PageSetup.PrintArea = ws.UsedRange.Address

With ws.PageSetup

.Zoom = False

.CenterHorizontally = True

.Orientation = xlPortrait

.FitToPagesWide = False

.FitToPagesTall = 1

End With

Next ws

ActiveWorkbook.PrintOut............

Four worksheets (A,B,C,D) all begin with row2 and end with the last non-blank cell.

What VBA code would merge the information from the four worksheets to Worksheet E?

Individually these formulas work - is there anyway I can combine them into one formula in one cell so the will look at the month and then perform SUM function?

=IF(I$2="apr",SUM(SUMIF('Raw Data'!$A$1:$A$64773,$A$1,'Raw Data'!D1:D64773),SUMIF('Raw Data'!$A$1:$A$64773,$A$74,'Raw Data'!D1:D64773),SUMIF('Raw Data'!$A$1:$A$64773,$A$75,'Raw Data'!D1:D64773),SUMIF('Raw Data'!$A$1:$A$64773,$A$76,'Raw Data'!D1:D64773),SUMIF('Raw Data'!$A$1:$A$64773,$A$77,'Raw Data'!D1:D64773),SUMIF('Raw Data'!$A$1:$A$64773,$A$78,'Raw Data'!D1:D64773)),"X")

Etc for all 12 months?

I have monthly reports that come to us from a Data Warehouse. They vary in size(row length). The problem is that the information in one column actually belongs in the next column (i.e. C to D). As this information in Column C is just an "offset" from Column D there is no issue with overwriting any data in column D. Manually, I could copy the columm and Paste Special, Skip Blanks, to column D.

I've been trying to do this in code as some reports can be fairly lengthy: As there are some blank rows, I've inserted this FinalRow procedure, to provide the size of each report:

FinalRow = ActiveSheet.UsedRange.Rows.Count + _

ActiveSheet.UsedRange.Rows(1).Row - 1

However, in trying to use the FinalRow value in a "Copy the contents from Column C....Cells(20,3 to FinalRow, 3) and then PasteSpecial to Column D (Operation:=xlNone, SkipBlanks:=True) has not been productive. It keeps producing a number of Errors, in every way that I have tried to make this work.

Copyrights 2005-15 www.BigResource.com, All rights reserved