Сүзілген ұяшықтарға қалай кірістіруге болады. Excel бағдарламасында көрінетін жолдарға қойыңыз. Жолдарды бағандарға және қайтадан кері түрлендіру
Павлов Николай
Бұл мақалада мен сізге жұмыс істеудің ең тиімді әдістерін ұсынғым келеді Microsoft Excel, Мен соңғы 10 жыл ішінде жобаларда жұмыс істеп, осы тамаша бағдарлама бойынша тренингтер өткізген кезде жинадым. Мұнда өте күрделі технологиялардың сипаттамасы жоқ, бірақ күнделікті әдістер бар - қарапайым және тиімді, «сусыз» сипатталған - тек «құрғақ қалдық». Осы мысалдардың көпшілігін меңгеру сізге бір немесе екі минуттан аспайды, бірақ олар әлдеқайда көп үнемдеуге көмектеседі.
Қажетті параққа жылдам өтіңіз
Сіз бірге жұмыс жасайсыз ба Excel жұмыс кітаптарыпарақтардың көп санынан тұрады? Егер олардың оннан астамы болса, онда келесі қажетті параққа әрбір көшу өздігінен шағын мәселеге айналады. Бұл мәселенің қарапайым және талғампаз шешімі - терезенің төменгі сол жақ бұрышындағы парақ қойындыларын айналдыруға арналған түймелерді сол жақпен емес, тінтуірдің оң жақ түймешігімен басу - кітаптың мазмұны пайда болады толық тізімбарлық парақтар және бір қозғалыста қалаған параққа өтуге болады:
Бұл сізге қажет нәрсені іздеу үшін бірдей түймелерді пайдаланып парақ қойындыларын айналдырудан әлдеқайда жылдамырақ.
Пішімдеуді бұзбай көшіріңіз
Тренинг кезінде оқушыларымның артында тұрған бұл суретті мен қанша жүздеген (мыңдаған?) рет көрдім: пайдаланушы бірінші ұяшыққа формуланы енгізеді, содан кейін төмендегі жолдардың пішімдеуін бұза отырып, оны бүкіл бағанға «созады», өйткені бұл әдіс формуланы ғана емес, ұяшық пішімін де көшіреді. Тиісінше, зақымдануды қолмен түзетуге тура келеді. Көшіру үшін секунд, содан кейін көшіру нәтижесінде зақымдалған дизайнды жөндеу үшін 30.
Excel 2002 нұсқасынан бастап бұл мәселенің қарапайым және талғампаз шешімі бар. Формуланы бүкіл бағанға көшіргеннен кейін (сүйреп апарғаннан) кейін бірден смарт тегті пайдалану керек - ауқымның төменгі оң жақ бұрышында уақытша пайда болатын шағын белгіше. Оны басу тізімді шығарады ықтимал опцияларкөшіру, мұнда пішімдеусіз толтыру таңдауға болады. Бұл жағдайда формулалар көшіріледі, бірақ пішімдеу:
Тек көрінетін ұяшықтарды көшіру
Егер сіз Microsoft Excel бағдарламасында бір аптадан астам жұмыс істеп жатсаңыз, сізде ұқсас мәселе бұрыннан болған болуы керек: кейбір жағдайларда ұяшықтарды көшіру және қою кезінде, бір қарағанда көшірілгеннен гөрі көбірек ұяшықтар кірістіріледі. Бұл көшірілген ауқымда жасырын жолдар/бағандар, топтаулар, аралық қорытындылар немесе сүзгілер болса, бұл орын алуы мүмкін. Мысал ретінде осы жағдайлардың бірін алайық:
Бұл кестеде аралық қорытындылар есептеледі және жолдар қала бойынша топтастырылған - мұны кестенің сол жағындағы плюс-минус түймелері және көрінетін жолдарды нөмірлеудегі үзілістер арқылы түсіну оңай. Егер біз осы кестеден деректерді әдеттегідей таңдап, көшіріп, қойсақ, бізде қосымша 24 жол пайда болады. Біз тек нәтижелерді көшіріп, қойғымыз келеді!
CTRL пернесін басып тұрып, қортындылардың әрбір жолын мұқият таңдау арқылы мәселені шешуге болады - көрші емес ауқымдарды таңдау сияқты. Бірақ мұндай үш немесе бес жол емес, бірнеше жүздеген немесе мыңдаған болса ше? Басқа, жылдам және ыңғайлы әдіс бар:
Көшіретін ауқымды таңдаңыз (біздің мысалда бұл A1:C29)
Пернетақтадағы F5 пернесін, содан кейін ашылған терезеде Таңдау түймесін басыңыз.
Пайдаланушы қатардағы барлығын емес, тек қажетті ұяшықтарды таңдауға мүмкіндік беретін терезе пайда болады:
Бұл терезеде «Тек көрінетін ұяшықтар» опциясын таңдап, «ОК» түймесін басыңыз.
Алынған таңдауды енді қауіпсіз көшіруге және қоюға болады. Нәтижесінде біз дәл көшірмесін аламыз көрінетін жасушаларжәне қажет емес 29 орнына бізге қажет 5 жолды ғана салыңыз.
Егер сіз мұндай операцияны жиі орындауға тура келеді деп күдіктенсеңіз, мұндай функцияны жылдам шақыру үшін Microsoft Excel құралдар тақтасына түймені қосу мағынасы бар. Мұны Құралдар> Теңшеу мәзірі арқылы жасауға болады, содан кейін Өңдеу санатындағы Пәрмендер қойындысына өтіп, Көрінетін ұяшықтарды таңдау түймесін тауып, тінтуірдің көмегімен құралдар тақтасына сүйреңіз:
Жолдарды бағандарға және қайтадан кері түрлендіру
Қарапайым операция, бірақ оны қалай дұрыс жасау керектігін білмесеңіз, жеке ұяшықтарды қолмен сүйреуге жарты күн жұмсауға болады:
Бұл шын мәнінде қарапайым. Жоғары математиканың матрицаларды сипаттайтын бөлімінде транспозиция ұғымы бар - матрицадағы жолдар мен бағандарды бір-бірімен алмастыратын әрекет. Microsoft Excel бағдарламасында бұл үш қадаммен орындалады: Кестені көшіру
Бос ұяшықты тінтуірдің оң жақ түймешігімен басып, Арнайы қою пәрменін таңдаңыз.
Ашылған терезеде Transpose жалаушасын белгілеп, OK түймесін басыңыз:
Деректерді диаграммаға жылдам қосыңыз
Қарапайым жағдайды елестетіп көрейік: сізде визуалды диаграммамен өткен айдың есебі бар. Тапсырма осы айдың диаграммасына жаңа сандық деректерді қосу болып табылады. Мұны шешудің классикалық жолы - диаграмма үшін деректер көзі терезесін ашу, онда оның атын енгізу және қажетті деректермен ауқымды бөлектеу арқылы жаңа деректер қатарын қосасыз. Оның үстіне, мұны істеуден гөрі айту оңай - бәрі диаграмманың күрделілігіне байланысты.
Басқа әдіс - қарапайым, жылдам және әдемі - жаңа деректері бар ұяшықтарды таңдау, оларды көшіру (CTRL+C) және тікелей диаграммаға қою (CTRL+V). Excel 2003, кейінгі нұсқалардан айырмашылығы, деректер ұяшықтарының таңдалған ауқымын сүйреп апарып, тінтуірдің көмегімен тікелей диаграммаға түсіру мүмкіндігін қолдайды!
Егер сіз барлық нюанстар мен нәзіктіктерді басқарғыңыз келсе, мәзірден Өңдеу> Арнайы қою опциясын таңдау арқылы әдеттегі емес, арнайы пастаны қолдануға болады. Бұл жағдайда Microsoft Excel бағдарламасы жаңа деректердің нақты қай жерде және қалай қосылатынын конфигурациялауға мүмкіндік беретін диалогтық терезені көрсетеді:
Сол сияқты, әртүрлі парақтардағы әртүрлі кестелердегі деректерді пайдаланып диаграмманы оңай жасауға болады. Бір тапсырманы классикалық әдіспен орындау әлдеқайда көп уақыт пен күш жұмсайды.
Бос ұяшықтарды толтыру
Кейбір бағдарламалардан есептерді жүктеп алғаннан кейін Excel пішімінемесе жиынтық кестелерді жасау кезінде пайдаланушылар көбінесе кейбір бағандарда бос ұяшықтары бар кестелермен аяқталады. Бұл олқылықтар кестелерге автосүзгі және сұрыптау сияқты таныс және ыңғайлы құралдарды қолдануға мүмкіндік бермейді. Әрине, бос орындарды жоғары деңгейлі ұяшықтардағы мәндермен толтыру қажет:
Әрине, деректердің аз көлемімен мұны қарапайым көшіру арқылы оңай жасауға болады - А бағанындағы әрбір тақырып ұяшығын бос ұяшықтарға қолмен сүйреу. Кестеде бірнеше жүз немесе мың жолдар және бірнеше ондаған қалалар болса ше?
Бір формуланы пайдаланып, бұл мәселені тез және әдемі шешудің жолы бар:
Бос орындар бар бағандағы барлық ұяшықтарды таңдаңыз (мысалы, біздің жағдайда A1:A12 ауқымы)
Таңдауда тек бос ұяшықтарды қалдыру үшін F5 пернесін және ашылатын шарлау терезесінде Таңдау түймесін басыңыз. Біз таңдағымыз келетін ұяшықтарды таңдауға мүмкіндік беретін терезені көресіз:
Ауыстырғышты бос күйіне орнатып, OK түймесін басыңыз. Енді таңдауда тек бос ұяшықтар қалуы керек:
Таңдауды өзгертпей, яғни. Тінтуірді түртпей, формуланы бірінші таңдалған ұяшыққа енгізіңіз (A2). Пернетақтадағы теңдік белгісін, содан кейін жоғары көрсеткіні басыңыз. Біз алдыңғы ұяшыққа қатысты формуланы аламыз:
Жасалған формуланы барлық таңдалған бос ұяшықтарға бірден енгізу үшін ENTER пернесін емес, CTRL + ENTER тіркесімін басыңыз. Формула барлық бос ұяшықтарды толтырады:
Енді нәтижелерді жазу үшін формулаларды мәндермен ауыстыру ғана қалады. A1:A12 ауқымын таңдап, оны көшіріп, Арнайы қою арқылы олардың мәндерін ұяшықтарға қойыңыз.
Ұяшықтағы ашылмалы тізім
Excel бағдарламасында жұмыс істейтіндердің барлығы білуі керек әдістеме. Оны пайдалану мақсатына қарамастан кез келген кестені дерлік жақсарта алады. Барлық тренингтерде мен оны бірінші күні шәкірттеріме көрсетуге тырысамын.
Идея өте қарапайым - кез келген жиынтықтан деректерді енгізу қажет болған жағдайда, ұяшықты пернетақтадан қолмен енгізудің орнына ашылмалы тізімнен тінтуірдің көмегімен қажетті мәнді таңдаңыз:
Прейскуранттан өнімді таңдау, клиенттің дерекқорынан клиенттің аты-жөні, штаттық кестеден қызметкердің толық аты-жөні және т.б. Бұл функцияны пайдаланудың көптеген нұсқалары бар.
Ұяшықта ашылмалы тізім жасау үшін:
Ашылмалы тізім жасағыңыз келетін ұяшықтарды таңдаңыз.
Егер сізде Excel 2003 немесе одан ескі нұсқасы болса, мәзірден Деректер > Тексеру тармағын таңдаңыз. Егер сізде Excel 2007/2010 болса, Деректер қойындысына өтіп, Деректерді тексеру түймесін басыңыз.
Ашылған терезеде ашылмалы тізімнен Тізім опциясын таңдаңыз.
Source өрісінде тізімде болуы керек мәндерді көрсету керек. Мұнда ықтимал нұсқалар берілген:
Осы өріске нүктелі үтірмен бөлінген мәтін опцияларын енгізіңіз
Егер бастапқы мәндері бар ұяшықтар ауқымы ағымдағы парақта болса, оны тінтуірдің көмегімен таңдау керек.
Егер ол осы жұмыс кітабының басқа парағында орналасса, оған алдын ала атау беру керек (ұяшықтарды таңдап, CTRL+F3 пернелерін басыңыз, бос орынсыз диапазонның атын енгізіңіз), содан кейін осы атауды өріске жазыңыз.
Тек көрінетін жолдарға қойыңызExcelсандарды, формулаларды, мәтінді бірнеше жолмен орындауға болады. Кестенің барлық жолдарына емес сандарды, формулаларды, мәтінді кірістіру қажет болғанда сүзгіні пайдалануға болады. Сүзгіні қалай орнатуға және Excel бағдарламасында сүзуге болады, «Excel бағдарламасында сүзу» мақаласын қараңыз. Бірақ деректерді тек көрінетін ұяшықтарға енгізу үшін, әсіресе жолдар көп болса, өзіңіздің әдістеріңіз қажет.
Бірінші жолкәдімгі .
Мынадай кестені алайық. Кесте барлық мысалдар үшін бірдей болады.
Кестеден барлық 2 цифрларын алып тастау үшін сүзгіні қолданайық. Қалған көрінетін ұяшықтарға біз 600 санын қоямыз. В2 ұяшығына 600 санын қоямыз, содан кейін оны бағанға көшіреміз (В2 ұяшығының төменгі оң жақ бұрышын тартыңыз). Мәндер тек көрінетін ұяшықтарға көшірілді. Сондай-ақ формулаларды дәл осылай кірістіруге болады. С2 ұяшығына келесі формуланы жазамыз. =A2*10
Бұл былай болып шықты. 
Сүзгіден бас тартайық. Нәтиже осындай кесте болып табылады.
Формула мен сандар тек сүзгіден өткен жолдарға енгізілді.
Екінші жол.
Біз сондай-ақ деректерді сүзгіден өткіземіз. Бірінші ұяшыққа санды, формуланы, мәтінді және т.б. Енді, егер мыңдаған жолдар болса, онда келесідей ұяшықтарды таңдаңыз: «Ctrl» + «Shift» + төмен көрсеткі түймесін басыңыз (немесе ұяшықтарды қай жерде таңдағыңыз келетініне байланысты жоғары - төмен немесе жоғары) сан жазылған ұяшық) .
Енді, немесе «Ctrl» + G пернелер тіркесімін немесе F5 пернесін басыңыз. Transition диалогтық терезесі пайда болады. «Таңдау...» түймесін басыңыз. Жаңа «Ұяшықтар тобын таңдау» тілқатысу терезесінде «Тек көрінетін ұяшықтар» сөздерінің жанындағы құсбелгіні қойыңыз.
«OK» түймесін басыңыз. Содан кейін әдеттегідей салыңыз.
Ұяшықтар тобын таңдау диалогтық терезесін шығарудың тағы бір жолы.«Басты» қойындысындағы «Өңдеу» бөлімінде «Табу және таңдау» түймесін басыңыз. Пайда болған тізімде «Ұяшықтар тобын таңдау» функциясын басыңыз.
Кімге көрінетін ұяшықтарды таңдалған ұяшықтарға толтырыңыз Excel бағандары , «Ctrl» + D пернелер тіркесімін басыңыз. Және барлық таңдалған бағандар бірінші ұяшықтағыдай деректермен немесе формуламен толтырылады. Біздің мысалда D2 ұяшығының D бағанына 800 санын жаздық.
Үшінші жол.
Жаңа бағанда (біздің мысалда Е бағаны) ұяшықтарды таңдаңыз. F5 пернесін басыңыз. Transition диалогтық терезесі пайда болады. «Таңдау...» түймесін басыңыз. Жаңа «Ұяшықтар тобын таңдау» тілқатысу терезесінде «Тек көрінетін ұяшықтар» сөздерінің жанындағы құсбелгіні қойыңыз. «OK» түймесін басыңыз. Енді таңдаудан бас тартпай, бағанның бірінші ұяшығына (біздікі - E2) формуланы, санды және т.б. «Ctrl» + «Enter» пернелер тіркесімін басыңыз.
Excel бағдарламасында деректерді таңдау сүзгі немесе сұрыптау арқылы жүзеге асырылды. Енді оларды басып шығару немесе басқа орынға ауыстыру қажет. Excel бағдарламасына көшіружасырын ұяшықтар да көшірілетін етіп конфигурацияланған.
Екі жолды қарастырайық, Кімге
Excel бағдарламасында сүзілген жолдарды қалай көшіруге болады.
Бірінші жол.
Excel бағдарламасында тамаша функция бар - Excel бағдарламасында арнайы функцияны қойыңыз.
Сонымен бізде үстел бар.
Сүзгіні қалай орнатуға болады, мақаланы қараңыз « Excel бағдарламасында сүзгі».
Барлық Ивановтарды тізімнен алып тастау үшін сүзгіні қолданамыз. Бұл былай болып шықты.
Кестені таңдап, контекстік мәзірде «Көшіру» түймесін басыңыз. A9 ұяшығын тінтуірдің сол жақ түймешігімен басып, контекстік мәзірде «мәндерді» таңдаңыз.
«OK» түймесін басыңыз. Voila. Көрінетін жолдардың мәні ғана емес, ұяшықтардың пішімі де көшірілді.
Бір нюанс бар- сүзгіден өткен деректерді сүзгі орналасқан жолдарға емес кірістіру. Мысалы, біздің мысалда - 1-7 жолдарда емес, төменде немесе басқа парақта және т.б. Сүзгі орналасқан жолдарға кірістірсек, сүзгіден өткен деректер сүзгі жасырған жолдарға да кірістіріледі. Жалпы, бұл бір ретсіз болып шығады. 
Екінші жол.
Кесте бірдей. Сүзілген деректері бар кестені таңдаңыз. «Басты» қойындысында «Өңдеу» бөлімін басыңыз Excel бағдарламасындағы функцияларды табу және бөлектеу. Содан кейін «Өту» түймесін басыңыз. Пайда болған диалогтық терезеде «Таңдау...» түймесін басыңыз. «Ұяшықтар тобын таңдау» терезесінде «тек көрінетін ұяшықтардың» жанындағы құсбелгіні қойыңыз. «OK» түймесін басыңыз. Енді сол таңдалған кестеде тінтуірдің оң жақ түймешігімен қоңырау шаламыз контекстік мәзір. «Көшіру» функциясын басыңыз. Жаңа жерде (біздің мысалда бұл A15 ұяшығы) «Кірістіру» түймесін басыңыз. Барлық. Бұл былай болып шықты.
Қалай, көшірмей, бірден Excel бағдарламасында сүзгі деректерін басып шығару, мақаланы қараңыз «Бетбелгі Excel парағы"Бет орналасуы""
Тізімдер мен ауқымдар (5)
Макростар (VBA процедуралары) (63)
Әртүрлі (39)
Excel қателері мен ақаулары (4)
Көшірілген ұяшықтарды тек көрінетін/сүзгіленген ұяшықтарға қалай қою керек
Жалпы, мақаланың мағынасы, менің ойымша, қазірдің өзінде тақырыптан анық көрінеді. Мен оны аздап кеңейтемін.
Жасыратыны жоқ, Excel бағдарламасы тек көрінетін жолдарды таңдауға мүмкіндік береді (мысалы, олардың кейбіреулері жасырын болса немесе сүзгі қолданылса).
Осылайша, егер сіз тек көрінетін ұяшықтарды осылай көшірсеңіз, олар күткендей көшіріледі. Бірақ сүзілген ауқымға (немесе жасырын жолдарды қамтитын) көшірілген нәрсені қоюға әрекет жасағанда, қоюдың нәтижесі дәл сіз күткендей болмайды. Деректер тіпті жасырын жолдарға да енгізіледі.
Ұяшықтардың бір ауқымын көшіріп, тек көрінетіндерге қойыңыз
Деректерді тек көрінетін ұяшықтарға енгізу үшін келесі макросты пайдалануға болады:
| Опция Ашық күңгірт rCopyRange Ауқым ретінде «Бұл макроспен біз деректерді көшіреміз Sub My_Copy() Егер Selection.Count > 1 болса, rCopyRange = Selection.SpecialCells(xlVisible) орнатыңыз Басқаша : rCopyRange = ActiveCell End, егер End Sub параметрін орнатыңыз «Бұл макроспен біз таңдалған ұяшықтан бастап деректерді енгіземіз Sub My_Paste() Егер rCopyRange ештеңе болмаса, Sub параметрінен шығыңыз, rCopyRange.Areas.Count > 1 болса, MsgBox "Қою диапазонында бір аймақтан артық болмауы керек!",vbКритикалық, «Жарамсыз диапазон»: Шығу Sub Dim rCell ретінде диапазон, li as long , le as long , lcount as long , iCol ретінде бүтін сан , iCalculation ретінде бүтін сан Қолданба.ScreenUpdating = False iCalculation = Application.Calculation: Application.Calculation = -4135 To iGeol үшін .Columns.Count li = 0: lCount = 0: le = iCol - 1 rCopyRange.Columns(iCol) ішіндегі әрбір rCell үшін.Ұяшықтар егер ActiveCell.Offset(li, le).EntireColumn.Hidden = False және _ ActiveCell.Offset орындалса. (li, le).EntireRow.Hidden = False Содан кейін rCell.Copy ActiveCell.Offset(li, le): lCount = lCount + 1 End Егер li = li + 1 End болса, lCount >= rCell.Row - rCopyRange.Cells(1) ).Қатар Келесі rCell Келесі iCol Application.ScreenUpdating = True : Application.Calculation = iCalculation End Sub |
Опция Ашық күңгірт rCopyRange диапазон ретінде "Деректерді көшіру үшін осы макросты пайдаланыңыз Sub My_Copy() Егер Selection.Count > 1 болса, содан кейін rCopyRange = Selection.SpecialCells(xlVisible) орнатыңыз Басқаша айтқанда: rCopyRange = End Sub болса, ActiveCell End орнатыңыз "Қою үшін осы макросты пайдаланыңыз. таңдалған ұяшықтардан басталатын деректер Sub My_Paste() Егер rCopyRange ешнәрсе болмаса, шығыңыз Sub If rCopyRange.Areas.Count > 1 Содан кейін MsgBox "Қосылған ауқымда бір аймақтан артық болмауы керек!", vbCritical, "Жарамсыз ауқым": Шығу Sub Dim rCell диапазон ретінде, li сияқты ұзын, le сонша ұзын, lсаны сонша ұзын, iCol бүтін сан ретінде, iCalculation ретінде бүтін Қолданба.ScreenUpdating = жалған iCalculation = Application.Calculation: Application.Calculation = -4135 iCol үшін = 1 және rlumCons үшін. .Count li = 0: lCount = 0: le = iCol - 1 rCopyRange.Columns(iCol) ішіндегі әрбір rCell үшін.Ұяшықтар ActiveCell.Offset(li, le).EntireColumn.Hidden = False және _ ActiveCell.Offset(li) орындалады. , le).EntireRow.Hidden = False Содан кейін rCell.Copy ActiveCell.Offset(li, le): lCount = lCount + 1 End Егер li = li + 1 End болса, lCount >= rCell.Row - rCopyRange.Cells(1). Жол Келесі rCell Келесі iCol Application.ScreenUpdating = True: Application.Calculation = iCalculation End Sub
Суретті аяқтау үшін бұл макростарды жылдам пернелерге тағайындаған дұрыс (төмендегі кодтарда бұл кодпен кітапты ашу кезінде автоматты түрде орындалады). Ол үшін төмендегі кодтарды модульге көшіру жеткілікті Бұл кітап (Бұл жұмыс дәптері) :
Опция Ашық "Жұмыс кітабын жабу алдында жылдам пернелерді тағайындаудан бас тарту Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.OnKey "^q": Application.OnKey "^w" End Sub "Жұмыс кітабын ашқан кезде жылдам пернелерді тағайындау Private Sub Workbook_Open() қолданбасы .OnKey "^q", "My_Copy": Application.OnKey "^w", "My_Paste" End Sub.
Енді пернелерді басу арқылы қажетті ауқымды көшіруге болады Ctrl + q , және оны сүзгіден өткенге салыңыз - Ctrl + w .
Мысал жүктеп алыңыз
(46,5 КБ, 9 622 жүктеу)
Тек көрінетін ұяшықтарды көшіріп, тек көрінетін ұяшықтарға қойыңыз
Сайтқа кірушілердің өтініші бойынша мен жақсартуды шештім бұл процедура. Енді кез келген ауқымдарды көшіруге болады: жасырын жолдармен, жасырын бағандармен және көшірілген ұяшықтарды кез келген ауқымдарға қоюмен: жасырын жолдармен, жасырын бағандармен. Ол алдыңғы нұсқамен бірдей жұмыс істейді: пернелерді басу арқылы Ctrl
+
q
қажетті ауқымды көшіріңіз (жасырын/сүзгіленген жолдар мен бағандармен немесе жасырын емес), және пернелер тіркесімі арқылы қойыңыз Ctrl
+
w
. Кірістіру сонымен қатар жасырын/сүзілген жолдар мен бағандарда немесе жасырынсыз орындалады.
Көшірілген диапазонда формулалар болса, сілтеменің орын ауыстыруын болдырмау үшін тек ұяшық мәндерін көшіруге болады, яғни. Мәндерді енгізу кезінде формулалар емес, олардың есептеу нәтижесі енгізіледі. Немесе кірістіру орын алатын ұяшықтардың пішімдерін сақтау қажет болса, тек ұяшық мәндері көшіріліп, қойылады. Ол үшін кодтағы жолды ауыстыру керек (төмендегі файлда):
| rCell.Copy rResCell.Offset(lr, lc) |
rCell.Copy rResCell.Offset(lr, lc)
бұған:
| rResCell.Offset(lr, lc) = rCell.Value |
rResCell.Offset(lr, lc) = rCell.Value
Бұл жолдардың екеуі де төмендегі файлда бар; тек тапсырмаларыңызға қолайлысын қалдырсаңыз болғаны.
Жүктеп алу мысалы:
(54,5 КБ, 7 928 жүктеу)
Сондай-ақ қараңыз:
[]
(«Төменгі жолақ»:("textstyle":"static","textpositionstatic":"төменгі","textpositionstatic":true,"textpositionmarginstatic":0,"textpositiondynamic":"bottomleft","textpositionmarginleft":24," textpositionmarginright":24,"textpositionmargintop":24,"textpositionmarginbottom":24,"texteffect":"slide","texteffecteasing":"easeOutCubic","texteffectduration":600,"texteffectslidedirection":"lefts","detadistance :30,"texteffectdelay":500,"texteffectseparate":false,"texteffect1":"slide","texteffectslidedirection1":"right","texteffectslidedistance1":120,"texteffecteasing1":"easeOutCubic:"duration"Cubic60", ,"texteffectdelay1":1000,"texteffect2":"slide","texteffectslidedirection2":"right","texteffectslidedistance2":120,"texteffecteasing2":"easeOutCubic","texteffectduration2":6010","texteffect2":6010" textcss":"display:block; padding:12px; text-align:left;","textbgcss":"display:block; position:absolute; top:0px; сол жақта:0px; ені:100%; биіктігі:100% ; background-color:#333333;мөлдірлік:0,6;сүзгі:альфа(мөлдірлік=60);","titlecss":"display:block; позиция: туыстық; шрифт:bold 14px \"Lucida Sans Unicode\",\"Lucida Grande\",sans-serif,Arial; түс:#fff;","descriptioncss":"display:block; позиция: туыстық; шрифт:12px \"Lucida Sans Unicode\",\"Lucida Grande\",sans-serif,Arial; түсі:#fff; margin-top:8px;","buttoncss":"display:block; позиция: туыстық; margin-top:8px;","texteffectresponsive":true,"texteffectresponsivesize":640,"titlecssresponsive":"font-size:12px;","descriptioncssresponsive":"display:none !important;","buttoncssresponsive": "","addgooglefonts":false,"googlefonts":"","textleftrightpercentforstatic":40))
