I've a sheet "Employee\_log" which contains the details of everyday log in a single string in column A. For example:

```

A1 : EMP1~EMP2~JOB1~JOB2...
A2 : EMP1~EMP3~JOB1~JOB3...
A3 : EMP2~EMP3~JOB2~JOB3...
```

Now I want the number of occurrences of `EMP1` and `JOB1` from this column and populate into another sheet "Ind\_Detail":

I'm using, but it's not working properly,:

```
Set DSht = Worksheets("Employee_log")

Dsht. Activate  

ThisWorkbook.Sheets("Ind_Detail").Cells(1, "A") =CountIfs(Range("A:A"), _
                                              "EMP1", Range("A:A"), "JOB1")

Set DSht = Nothing

```