Arabic Primavera

Member for

20 years 3 months

Hi Moutaz



the problemcan be solved with a macro. However I don’t have an arabic keyboard, therefore I cannot give you a perfekt solution - you must try and find out yourself .

Write your text in Excel (in a sheet called activity)starting in column "A", row 3 to 999 in Arabic language. Run this macro, now you get some funny looking text in Column "B". Import this text into P3 to your Activity description. Format this column to arabic and thats it. In this macro you will find a number "950" This number must be testet: I know that for greek and for russian this number is 720 and 848 And I know that arabic is behind Russian that is all. If it does not work just send me some arabic writing, so I could test it here.



Hannes

===================================================

Sub TranslateArabic()



iRow = 3



Worksheets("Activity").Activate

Do While Not IsEmpty(Cells(iRow, 1))

Application.StatusBar = "Transforming Row: " & iRow - 2

If Cells(iRow, 1) <> "" Then

Test = ""

For i = 1 To Len(Cells(iRow, 21))

Zwischen = AscW(Mid(Cells(iRow, 1), i, 1))

Test = Test & IIf(Zwischen < 256, ChrW(Zwischen), ChrW(Zwischen - 950))

Next i

Cells(iRow, 2) = Test



End If

iRow = iRow + 1

Loop



End Sub

==============================================

Member for

21 years 10 months

Thanks Alexander and Karim



Karim, I did exactly what you said and as I told you every thing is going well however I could not write in Arabic, I still do not know the reason.



Best Regards,



Moutaz

Member for

19 years 7 months

moutaz,



After adding the desired font u need to change the default font of read/write with ur Arabic script font.



For example if u want to type the activity description in Arabic then u have to change the default font of this column by:

1- Click on "format" --> "columns"

2- Click on "activity description" and then right click on "data font" and set it as your desired font.



After that u should type normally in Arabic in the column that u’ve modified its default font ("activity description" in our case).





Regards,

Karim

Member for

22 years 9 months

Moutaz,

as far as I know, you can only write in arabic if the system enables right to left writing; MS Word exists in a specific version that enables english/arabic writing, I do have another small wordprocessor to do the same thing; I suspect that yoyu will need a specific version of MS Windows to be able to write in arabic within P3, and do not forget that P3 is a 16-bit app.

Iskander

Member for

21 years 10 months

Karim,



Sorry I was in a hurry, I did what you told me exactly and every thing was O.K but when I tried to write in P3 the font was rubbish, eventhough I can write in word in Arabic.



Regards,



Moutaz

Member for

21 years 10 months

Karim,



Thanks Very much, it’s wonderful.



Best Regards,



Moutaz

Member for

19 years 7 months

moutaz,



If u have some Arabic fonts installed on your windows system then u can type in P3 in Arabic.



a- You have to add the Arabic font to P3:

1- Click on "format" --> "fonts"

2- Scroll to the bottom of the fonts windows, now right click under the font tab, a windows appears choose from it your deiserd font (eg. Traditional Arabic or Times New Roman) bearing in mind that u have to click on the "Script" list and select "Arabic", u can also set the font size from this windows.



b- After adding the desired font u now need to type the activity description in arabic:

1- Click on "format" --> "columns"

2- Clcik on "activity descprition" and then right click on "data font" and set it as your desired font.



Note that u can make all the columns reads/writes in Arabic.



HTH.



Regards,

Karim

Member for

22 years 9 months

sbah el kheir moutaz,

I know that’s possible, and there is a post describing the procedure somewhere on Planningplanet; however, because the search engine is down, it is difficult to find it.

I know a company in Tunisia or Egypt (I don’t remember, smaâli) that specializes in making arabic caracter fonts and right to left wrinting system avalaible from within a latin system soft application.

Have a look at the following pages, and let me know

bqa 3la kheir,

Alexandre

http://www.sakhr.com/

http://www.al-islam.org/fonts/Viewing.htm