Microsoft Office 2007 , FAQ

მე მინდა რომ სწორედ მაგ შრიფტით დაიწეროს რაღაც გარკვეული რაოდენობის ტექსტი. მგონი იმუშავებს თუკი ამ ტექსტს (სხვა ფაილში მიწერია სხვა შრიფტით) ჩავაკოპირებ იმ გამოგზავნილ ფაილში და მერე მთლიან ტექსტს Garamond-ში გადავიყვან

არწივი9
წესით უნდა იმუშაოს.
თუ მაინც პრობლემაა, Paste-ის მაგივრად სინჯე Paste Special... \ Unformatted Unicode Text.

This post has been edited by Niefer2 on 6 Oct 2010, 21:48

Niefer2

ეგ გამოვიდა და ახლა რა მინდა გავიგო

მოკლედ მაქვს სხვების მიერ გამოგზავნილი ფაილი რომელშიც გარკვეული ტექსტი უნდა ჩავაკოპირო გარკვეული შრიფტით და ზომით. აგრეთვე, აუცილებელია რომ ფურცლის ზომები და ველები (margins) არ შეიცვალოს. ეს ფაილი ერთგვერდიანია თავიდან, ხოლო მანდ ჩასაწერი გვერდი სულ ცოტა ათგვერდიანი მაინც იქნება. და აი პრობლემა: როდესაც პირველ გვერდზე გადავაკოპირე ტექსტი იქ ეს margins არ შეიცვალა, გადავედი მეორე გვერდზე და შეიცვალა, არადა იგივე უნდა იყოს:

მე რათქმაუნდა შემიძლია ამ მეორე გვერდზე (და შემდეგებზეც) ეს margins ხელით დავაყენო ისეთი როგორიც პირველ მოცემულ გვერდზეა, მაგრამ მე მაინტერესებს ვორდის პროგრამას სადმე თუ აქვს ისეთი ფუნქცია რომ ისინი (და ვთქვათ თვითონ ფურცლის ზომაც) არსად არ შეიცვალოს რა ტექსტიც არ უნდა ჩავაკოპირო მანდ? წარმოიდგინეთ კარგა ას გვერდზე რომ იყოს ეს ველები გასასწორებელი რა დამღლელი საქმე იქნებოდა!

რა მაინტერესებს ეხლა....დოკუმენტის ბეჭდვის დროს როდესაც აძლევ რომ ამობეჭდოს კენტი გვერდები და მერე ამ ფურცლებზე ამოაბჭდინო ლუცი გვერდები ეს შესაძლებელია ვორდში,,მაგრამ რატომღაც ვერ მივაკვლიე ექსელში.......ექსელს საერთოდ არა აქვს ამდაგვარი ფუნქცია თუ რაიმე არის ჩასართავი????

აუ გთხოვთ მითხარით, ვორდში ტექსტი როგორ ამოვაბრნო – მაგალითდ დავწერე რაღაც, ხოდა მინდა გვერდულად იყოს.... როგორ ვქნაა ?? ხელფ

mchxapneli
insert, text box, ჩაწერ ტექსტს, text direction და მიუთითებ როგორც გინდა.
text box-ის კონტური თუ არ გინდა, მიეცი format shape-ში მიუთითებ no color-ს shape-ზე.

TAZ
დიდი მადლობააა....................

mchxapneli
არაფრის

cixe78

მხოლოდ მაკროთია შესაძლებელი:

Sub Print_Odd_Even()
Dim Totalpages As Long
Dim StartPage As Long
Dim Page As Integer

StartPage = 1 '1 = Odd and 2 = Even

'Or use the InputBox suggestion from Gord Dibben
'StartPage = InputBox("Enter 1 for Odd, 2 for Even")

Totalpages = Application.###cuteExcel4Macro("GET.DOCUMENT(50)")
For Page = StartPage To Totalpages Step 2
ActiveSheet.PrintOut from:=Page, To:=Page, _
Copies:=1, Collate:=True
Next
End Sub

This post has been edited by GიორGი on 8 Oct 2010, 12:00

GიორGი
ეს რაც ეხლა შენ აქ დაწერე ჩემთვის ჩინურია .... ჯერ მაკრო რაა ის ამიხსენი და მერე ეს რომ ჩამოარიკრიკე აქ ის.....

ვინც ექსელში და გამოთვლებში ერკვევით
როგორ გამოვთვალო ექსელში მაგალიტად
500 -ის 20%
700-ის 35% და ესეთი გამოთვლები...
მადლობა წინასწარ

C სვეტში წერია კოდი რომელიც შენ გჭირდება


მიმაგრებული სურათი

kekvi
შეგიძლია უკეთ ამიხსნა რის მერე რას აკეთებ..
თორე ესე ვერ გავიგე როგორ აკეთებ, პირველად მაქვს მაგასთან შეხება..

ldg
შევეცდები აგიხსნა ფორმულას წერ იმ გრაფაში რომელშიც გინდა მიიღო პასუხი მაგალითად ჩვენს შემთხვევაში C უჯრაში ვიწყებთ წერას = სით
იხ სურათი:


შემდეგ ვაკლიკებთ ანუ (დავაწკაპებთ) A უჯრას ანუ რისი პროცენტიც გვინდა გავიგოთ
იხ სურათი:


შემდეგ ვწერთ გაყოფას ანუ / ამ სიმბოლოს (ეს სიმბოლო არის გაყოფა ექსელში)
იხ სურათი:


ვწერთ 100 ანუ ჩვენ ვიცით როგორც გამოაინგარიშება პროცენტი ანუ X/100*%

იხ სურათი:


შემდეგ ვწერთ გამრავლებას ანუ * ამ სიმბოლოს (ეს მიბოლო არის გმარავლება ექსელში)

იხ სურათი:


შემდეგ ვაკლიკებთ B უჯრას რადგა იქ გვიწერია ჩვენთვის საჭირო პროცენტი
იხ სურათი:


შემდეგ ვაკლიკებთ კლავიატურაზე Enter ს
და ვიღებთ პროცენტს ანუ C უჯრაში პასუხს
იხ სურათი:

ეს არის და ეს

ექსელს ასევე აქ ფუნქცია ფორმულის ჩამოგრძელების ანუ ერთხელ ხო დავწერეთ ფორმულა რომ C უჯრისთვის რომ
= A1/100*B1

მეორე უჯრაში დავწერთ რიცხვებს ანუ 700 და 35 ს
იხ სურათი:


გადავდივართ C უჯრაზე

და ვკიდებთ ხელს და ჩამოვწევთ ქვევით ესე
იხ სურათი:

და ვირებთ ქვევითა უჯრასი პასუხს :
იხ სურათი:

და ასე შეგიძლია გააგრძელო რამდენიც გინდა





წარმატებები

tuchka84
გაიხარეე
გასაგებია ძალიან დიდი მადლობა :-)))