Hi guys, I have 2 excel files that I want to have when applying macro and exporting data from excel 1 to excel 2 this condition:
In the NOOS/SOPO column:
If you select NOOS in Excel 1(from Drop-Down) , the NOOS column in excel 2 will be Yes
If you select SOPO in Excel 1, the SOPO column in excel 2 will be Yes
If you select NOOS&SOPO in Excel 1, the NOOS and SOPO columns in excel will be Yes.
I have written this macro but unfortunately, it does not work, can you please help me.
[
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "NOOS" Then
ws.Cells(lngZ_dest, dt_col_exp("NOOS [NOS]")).Text = "Ja"
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "SOPO" Then
ws.Cells(lngZ_dest, dt_col_exp("SOPO[Sonderposten/Remainders]")).Text = "Nein"
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "NOOS&SOPO" Then
ws.Cells(lngZ_dest, dt_col_exp("SOPO[Sonderposten/Remainders]")).Text = "Ja" And ws.Cells(lngZ_dest, dt_col_exp("NOOS [NOS]")).Text = "Ja"
End If
End If
End If
]
In the NOOS/SOPO column:
If you select NOOS in Excel 1(from Drop-Down) , the NOOS column in excel 2 will be Yes
If you select SOPO in Excel 1, the SOPO column in excel 2 will be Yes
If you select NOOS&SOPO in Excel 1, the NOOS and SOPO columns in excel will be Yes.
I have written this macro but unfortunately, it does not work, can you please help me.
[
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "NOOS" Then
ws.Cells(lngZ_dest, dt_col_exp("NOOS [NOS]")).Text = "Ja"
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "SOPO" Then
ws.Cells(lngZ_dest, dt_col_exp("SOPO[Sonderposten/Remainders]")).Text = "Nein"
If .Cells(lngZ_src, dt_col("NOOS/SOPO")).Value = "NOOS&SOPO" Then
ws.Cells(lngZ_dest, dt_col_exp("SOPO[Sonderposten/Remainders]")).Text = "Ja" And ws.Cells(lngZ_dest, dt_col_exp("NOOS [NOS]")).Text = "Ja"
End If
End If
End If
]