Hi Arda
Hope you are doing well.

I checked the code you mentioned above and it works. To make it more clear I’m attaching some images with the code.

Here, I tried the exact code in the same dataset.
MsgBox Range("E5").End(xlToRight).Offset(0, 1).Address

You can see the result $G$5.

Again I changed the dataset slightly.

Here, the result is also based on the location.

NB. If it doesn’t help you then please send your dataset to [email protected] or [email protected]

Thanks
Shamima Sultana
ExcelDemy

Dear Bolajoko Olufemi,

You will get all resources related to Data Analysis here All About Data Analysis. We are planning to launch courses as soon as possible.

Regards
ExcelDemy

Dear Ronhat Minmin,

If you want to get the Excel File, you can download it from Download Practice Workbook

Regards
ExcelDemy

Hello Dear,

You can download the Excel and PDF files free of cost just by providing your valid email address. To get the files go to the “Download Excel Formulas Cheat Sheet PDF & Excel Files” section of this post and enter your email address. Then check your email immediately after to get the download links.

Best Regards
ExcelDemy

Dear Khin Soe,

You are most welcome.

Regards
ExcelDemy

Dear Mohamad,

Thanks for your appreciation

Regards
ExcelDemy

Dear Sandeep Bhattacharjee,

You are most welcome and thanks for your appreciation.

Regards
ExcelDemy

Dear S Roy,

You are most welcome.

Regards
ExcelDemy

Dear Lana,

You are most welcome.

Regards
ExcelDemy

Hi Ndonwi,

Thanks

Dear Joanna,

You are most welcome.

Regards
ExcelDemy

Dear Andrei,

These functions are available in WPS office.

Regards
ExcelDemy

Dear Tommy Fuifui,

You are most welcome.

Regards
ExcelDemy

Dear Car,

You are most welcome.

Regards
ExcelDemy

Dear Anitelleth,

You are most welcome.

Regards
ExcelDemy

Dear Kay,

You are welcome.

Regards
ExcelDemy

Dear Abel,

Thanks for your appreciation. You are most welcome.

Regards
ExcelDemy

Dear Joris,

You are most welcome. We are glad to hear that.

Regards
ExcelDemy

Dear Kapil,

Thanks for your appreciation.

Regards
ExcelDemy

Hello Silpa,

You can download the Excel and PDF files free of cost just by providing your valid email address. To get the files go to the “Download Excel Formulas Cheat Sheet PDF & Excel Files” section of this post and enter your email address. Then check your email immediately after to get the download links.

Best Regards
ExcelDemy

Dear Ajij Nadaf,

We will love to give you suggestions. kindly share your problem.

Regards
ExcelDemy

Hey Philip,

Thanks for your response. You can use the SORT and FILTER functions along with the LARGE function to solve your problem.
Here’s the practice sheet we used. You can check it out for a better understanding.
SORT-FILTER.xlsx
You can also check out this article for more detailed explanations.
https://www.exceldemy.com/excel-top-10-list-with-duplicates/

Regards
Hassan Shuvo| ExcelDemy Team

Dear MD. KAMAL HOSSAIN,

To obtain your required format please follow the following simple steps:
From your Excel Workbook, press ALT + F11 to open Visual Basic Editor.
Insert a module.
Paste the following code:

Function NumberToWords(ByVal Number As Long) As String
    Dim Ones() As String
    Dim Tens() As String
    Dim Group() As String
    Dim Result As String
    
    Ones = Split("One,Two,Three,Four,Five,Six,Seven,Eight,Nine", ",")
    Tens = Split("Ten,Eleven,Twelve,Thirteen,Fourteen,Fifteen,Sixteen,Seventeen,Eighteen,Nineteen", ",")
    Group = Split("Twenty,Thirty,Forty,Fifty,Sixty,Seventy,Eighty,Ninety", ",")
    
    If Number = 0 Then ' Handle zero
        Result = ""
    ElseIf Number < 10 Then
        Result = Ones(Number - 1)
    ElseIf Number < 20 Then
        Result = Tens(Number - 10)
    ElseIf Number < 100 Then
        If Number Mod 10 = 0 Then ' Handle multiples of 10
            Result = Group(Int(Number / 10) - 2)
        Else
            Result = Group(Int(Number / 10) - 2) & " " & Ones(Number Mod 10 - 1)
        End If
    ElseIf Number < 1000 Then
        Result = Ones(Int(Number / 100) - 1) & " Hundred " & NumberToWords(Number Mod 100)
    ElseIf Number < 1000000 Then
        Result = NumberToWords(Int(Number / 1000)) & " Thousand " & NumberToWords(Number Mod 1000)
    ElseIf Number < 1000000000 Then
        Result = NumberToWords(Int(Number / 1000000)) & " Million " & NumberToWords(Number Mod 1000000)
    Else
        Result = "Number is too large."
    End If
    
    NumberToWords = Trim(Result)
End Function

Now, return to your worksheet. Type in the following formula in the cell where you require the output and press Enter key.
=NumberToWords(B5) & ” Taka Only”
Here, B5 indicates the reference of the cell where you have the input number.

I hope this solution will be sufficient for your requirements. Let us know your feedback.

Regards,
ExcelDemy

Dear Tudor,

Hope you are doing well. Answer of your questions are given below with explanation.

1. How can I change the month and day from English to Romanian?

Select the cell with month and date, cell C7 in our case.
Right-click with the mouse and select Format Cells.

In the Format Cells window, select Romanian (Moldova) under the Locale menu.
Then, select any type under the Type menu and click the OK button.

The month and date are changed into Romanian from English. Do the same process for cell E7.

2. If an employee works on Saturday and/or Sunday, how can I collect those weekend hours separately, in a cell?

Let’s say the first employee works on Saturday and Sunday for 5 and 6 hours respectively. He works on 4 weekends which you can see in the picture. To sum these values we’ll use the SUMIFS function.
Apply the formula in any cell where you want the weekend hours, let’s say cell AM11-
=SUMIFS($F$11:$AJ$11,$F$11:$AJ$11,"<>P",$F$11:$AJ$11,"<>A")

Thanks for your suggestions.

Dear Elizabeth,

You are most welcome. We are so glad that our article fulfilled your need.

Regards
ExcelDemy

Dear HG,

You are most welcome.

Regards
ExcelDemy

Dear Gunawan,

Thanks for your suggestions. We updated the article. You can check it now.

Regards
ExcelDemy

Dear Rafi,

Thanks for your appreciation.

Regards
ExcelDemy

Dear Rashmi,

You are most welcome.

Regards
ExcelDemy

Dear Silver,

You are most welcome.

Regards
ExcelDemy

Dear Eugen Safta,

You are most welcome.

Regards
Shamima Sultana | ExcelDemy

Dear Sanket,

Thanks for your appreciation.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear Vivasvan,

You are most welcome. It’s great to know that our article helped you to complete your project.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Hi Robert Bakinam,

Here, you will get the full copy in pdf Marking Result Sheet.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear Kirsten Wheeler,

Thanks for your appreciation. To get solutions with detailed explanations, follow ExcelDemy.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear CJvW,

Thanks for your appreciation. To get more helpful content be with ExcelDemy.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear Michael Gamal Aziz,

You are most welcome.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear Uday Kumar,

We are working on your problem. We will appreciate you to post your problem in our ExcelDemy Forum.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Dear Datla Srinivas,

We are working on your requirements. We hope we will come back to you with your expected solutions.

Regards
Shamima Sultana
Project Manager | ExcelDemy

Hello Joanie,

You are most welcome.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear Ven Upekkha,

Thanks for your appreciation.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear umit,

Thanks for your appreciation it means a lot to us.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear Carl,

Thanks for your appreciation. ExcelDemy is glad to help you.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear Micah,

Thanks for your kind words. ExcelDemy is dedicated to provide solutions to help you.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear Shanmuga Raja V S,

Thanks for your appreciation. Stay in touch with ExcelDemy.

Regards
Shamima Sultana | Project Manager | ExcelDemy

Dear Zidane,

Thanks for your appreciation.

Shamima | Project Manager | ExcelDemy

Hello Uday Kumar,

Kindly check the reply to your previous comment. We have given you a non-macro solution.

Dear Gilson,

Thanks for your appreciation. Stay in touch with ExcelDemy to get more helpful content.

Regards
Shamima | Project Manager | ExcelDemy

Dear Syed Anwar Hussain,

Thanks for your appreciation.

Regards
Shamima | Project Manager | ExcelDemy

Hello, An!

You are most welcome. To get helpful content follow ExcelDemy.

Regards
ExcelDemy

Hi Rassulsson!

Thanks for your appreciation.

Regards
ExcelDemy

Hello, Hamza!

Thanks for your appreciation. We are glad that our article helped you.

Regards
ExcelDemy

Hello, Nabil sellami!

Thanks for your appreciation. To get more enjoyable articles stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Helen!

Thanks for your appreciation. To get more helpful information stay in touch with ExcelDemy.

Regards
ExcelDemy

Hi, Elton!

Thanks for your appreciation. We will try to launch pdf files.

Regards
ExcelDemy

Hi, Bosco!

Thanks for your appreciation. To get more informative contents stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Aleksandra!

Thanks for your appreciation.

Regards
ExcelDemy

Hello, Harry!

You can download the copy from Download Sample Workbook

Regards
ExcelDemy

Hi Abishek Sharma!

If you want the Excel file then you can download it from the Download Practice Workbook section. Or you need other assistance you can comment or send us mail at [email protected]

Hello, Ruben!

It’s glad to know that our content is helpful to you. To know more about Excel stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Tanael Wawe!

Thanks for your appreciation. Stay in touch with ExcelDemy to get more helpful content.

Regards
ExcelDemy

Hello, Ahnaf!

You are most welcome. stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Mohan!

Thanks for your appreciation. Stay in touch with ExcelDemy for more helpful content.

Regards
ExcelDemy

Hello, ExcelAmateur!

Thanks for your appreciation. To get more helpful content with explanations stay in touch with ExcelDemy.

Regards
ExcelDemy

Glad to hear that.

Regards
ExcelDemy

Hello!

Thanks for your appreciation.

Regards
ExcelDemy

Hi, Dhaval!

Thanks for your appreciation.

Regards
ExcelDemy

Hello, Suzette!

Thanks for your appreciation. We will try to use fonts that will be easier to read for old eyes.

Regards
ExcelDemy

Hello, Instast!

Thanks for your appreciation. To get more helpful content stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Andre!

Thanks for your appreciation. To get more helpful posts stay in touch with ExcelDemy.

Regards
ExcelDemy

Hello, Im!

Hope you are doing well. Thanks for your appreciation.

Regards
ExcelDemy

Hello, Aston!

Hope you are doing well. To show your data labels in millions kindly follow this article Millions in Data Labels

Regards
ExcelDemy

Hello, Kim!

Thanks for your appreciation. For more useful content visit our site ExcelDemy.

Regards
ExcelDemy

Hello Gerald,
Do you need to know the conversion from Excel to PDF? Right? Because the original bank statement was in PDF format. So, here you can follow the steps below to convert your Excel file back to PDF file.
Firstly, you need to open your Excel file.
Secondly, click the File button at the top-left corner of the Excel file.

Thirdly, go to Save As and click it.

Fourthly, choose PDF from the Save option at the top-right corner by clicking the drop-down button.

Finally, choose a particular location to keep it by selecting Browse button.

Thanks
Regards
ExcelDemy

Hello, SS!

Hope you are doing well. We are very sorry that you are facing some troubles with advertising. But will try our best to give you a nicer experience.

Regards
ExcelDemy

Hi Peter

Thanks for your appreciation.

Regards
ExcelDemy

Hi N,

Thanks for your appreciation. Please visit our site for more excel-related problems.

Thanks

Regards
ExcelDemy

Hi GIRIDAR N,

Thanks for your appreciation and we are glad to help you. For any types of Excel-related problems kindly reach out to us.

Regards
ExcelDemy

Hi Exceler,

Here, I tried the first method for 50 sets of data and it worked but you have to change the cell references based on your dataset. For your better understanding, I am attaching the images along with the formula.
=INDEX($D$5:$D$30,MATCH(1,MMULT(--($B$5:$C$30=F5),TRANSPOSE(COLUMN($B$5:$C$30)^0)),0))

The images of datasets

Here, I used the formula for the entire dataset. I changed the references based on my dataset.

Output for 50 values:

Note: If your dataset is very large kindly send us your dataset

Thanks
Shamima Sultana

Hello Mark,

We uploaded the Excel files again, you can check these files also. If you find any difficulty opening the file let us know.

Thanks

Hi Froggy,
Hope you are doing well. Thanks for reaching out to us with your issue.

As you intend to apply the above code to a workbook with multiple sheets so you need to add some extra lines in your code to define all available worksheets or selected worksheets.

Here, I will give you two solution
1. For selected sheets
2. For all the available sheets in a workbook

1. If you want to apply the same code in some selected sheets then use the code given below where I declared sheets names by using an Array.

Option Explicit
Sub AddSpaceBetweenRows()
Dim all_sheets As Worksheet
Dim rng As Range
Dim i As Long
Dim all As Variant

Set all = sheets(Array(“VBA1”, “VBA2”))

For Each all_sheets In all
all_sheets.Select
Set rng = Range(“B5:E9”)
For i = rng.Rows.Count To 2 Step -1
rng.Rows(i).EntireRow.Insert
Next i
Next
End Sub

2. To loop through all the available sheets of your workbook you will need to use the code given below where I declared all_sheets and used an extra For Loop.

For your better understanding, I’m providing the modified code here,

Option Explicit
Sub AddSpaceBetweenRows()
Dim all_sheets As Worksheet
Dim rng As Range
Dim i As Long

For Each all_sheets In Worksheets
all_sheets.Select
Set rng = Range(“B5:E9”)
For i = rng.Rows.Count To 2 Step -1
rng.Rows(i).EntireRow.Insert
Next i
Next
End Sub

Note: Based on your Excel file you will need to change the sheet name and the cell range selection.

For further queries comment down below.

Hi Helen,
I’m glad that our article helped you. For any types of Excel related problems kindly check out our ExcelDemy site.

Thanks
Shamima

Hi A,

Thanks for your appreciation.

Hi Deon Bailey,
Hope you are doing well. Thanks for reaching out to me with your issue.

As you didn’t share your Excel file that’s why it is hard to understand your sheet name and where is the problem occurring.

But you need not to worry, I’m giving you a possible solution so that you can add data to your selected sheet to the last row.

The reason for overwriting the added data is your code wasn’t finding the last row it was showing 1 as the last row number.

Here, I added data according to my dataset I used in this article. I commented out your code and added some required lines.

Sub Insert_Value_from_LastRow()

‘TargetSheet = Cmb_Months.Value
‘If TargetSheet = “” Then
‘Exit Sub
‘End If
Dim targetSheet As Worksheet
Set targetSheet = ThisWorkbook.Worksheets(“Dataset”)
targetSheet.Activate
‘lastrow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
LastRow = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row
MsgBox LastRow

‘ActiveSheet.Cells(LastRow + 6, 2).Value = Cmb_Area.Value
‘ActiveSheet.Cells(LastRow + 6, 3).Value = Txt_Ln_Manager.Value
‘ActiveSheet.Cells(LastRow + 6, 4).Value = Txt_FName.Value
‘ActiveSheet.Cells(LastRow + 6, 5).Value = Txt_Surname.Value
‘ActiveSheet.Cells(LastRow + 6, 6).Value = Txt_S_Number.Value

ActiveSheet.Cells(LastRow + 3, 2).Value = “Rachel Ross”
ActiveSheet.Cells(LastRow + 3, 3).Value = “Germany”
ActiveSheet.Cells(LastRow + 3, 4).Value = “laptop”
ActiveSheet.Cells(LastRow + 3, 5).Value = 4567

End Sub

Note: Whenever you want to insert or add data after a particular row it is better to see the last row number by using MsgBox. It will help you to understand why data is overlapping.

I also added the images.

For further queries, you can send me your Excel file.

Thanks
Shamima Sultana