Merge contents of 2 Excel cells keeping character format intact (using VBA) -


As the title says, I try to merge the contents of 2 out of 3 cells in Excel. There was a similar question, but those solutions do not have to retain the character. For example, some parts of source cell contents are bold and red formatted, the other parts are normal. When I call them 

  range ("A3") = range ("A1") and & amp; Range ("A2")

Then any formatting of A1 and A2 is lost. The format that I need is retaining a pattern. This is going to be part of a larger VBA program, so I do not want a VBA solution, no formula, please. Excel version 2002 (XP).

Doctor, this is an interesting question that I was stumped myself, but saw the value, so some After the search, what I have found here is that. From the basic understanding of the formatting I have in the cell, which I've got modified for my use below.

Merge_Cells () Dynamic IOn integer dim RngFrom1 as range Range dim RngFrom2 Range dim RngTo as Range dim as lenFrom1 Integer set as integer lenFrom2 set integer rngFrom1 = Set cells (1, 1) as rngFrom2 = cells (1, 2) set rngTo = cells (1, 3) lenFrom1 = rngFrom1.Characters.Count lenFrom2 = rngFrom2.Characters.Count rngTo. Value = rngFrom1.Text & amp; RngFrom2.Text for IOS = 1 lenFrom1 with rngTo.Characters (iOS, 1) .Font .Name = rngFrom1.Characters (iOS, 1) .fontName .bold = rngFrom1.Characters (iOS, 1) .Font.Bold .Size = rngFrom1.Characters (iOS, 1) .Font.Size .ColorIndex = rngFrom1.Characters (iOS, 1) with rngTo.Characters for IOS = 1 to the next iOS lenFrom2 (lenFrom1 + iOS, 1 .Font.ColorIndex termination) .font .Name = rngFrom2.Characters (iOS, 1) .fontName .bold = rngFrom2.Characters (IOS, 1) .Font.Bold .Size = rngFrom2.Characters (IOS, 1) .Font.Size .ColorIndex = RngFrom2.Can (IOS, 1) .Font.ColorIndex End with Next IOS End Sub

Just type 3 with your specific cells Replace botany (maybe) Someone might get a cleaner, but when I tested it, then it works as I understand (and I). Hope this will be helpful ...


Comments

Post a Comment

Popular posts from this blog

sql - dynamically varied number of conditions in the 'where' statement using LINQ -

I am using my first project LINQ (in mvc), so maybe there's something very simple that I remember. However, a day of searching and experimenting does not work, so it works. I am trying to write a LINQ query (Linux to SQL) in which in many cases where the statement is different from an OR or an AND. We do not know how many conditions are going in the query till runtime. This search is for filter control, where the user can choose multiple criteria for filtering. Select from table where table.col = 1 or table.col = 2 or table.col = 7 .... 'Other number of conditions Before I just create the SQL query as a string, while looping over all the situations. However, it seems that there should be a good way to do this in LINQ. I tried to use Expression trees, but they had a second thought for this moment on my head, where the lambda function was to be executed inside the statement such as: values ​​for matchingRows = matchingRows for each value Where (function (row) row.c...
Read more

asp.net mvc - Dynamically Generated Ajax.BeginForm -

I have a problem with ASP.NET MVC Ajax forms. I generate many Ajax form in a table such as: & Lt; Input type = "submit" name = "activity" value = "add activity" / & gt; & Lt;%}% & gt; & Lt; / TD & gt; & Lt; / TR & gt; & Lt;%}% & gt; So far so good. When I post one of those forms, it gives a partial view in a div, and in this new partial view a new Ajax Beginnform (which is not in Genesis form) This second Ajax Beginnorf is exactly like the ones I got on the table, but when I post it, I do not get the "Ajax Post", but a normal post that sends me to a new page, I do not know whether the two Ajax forms What is the reason for the difference between, why is it the "dynamically generated" Ajax form behaves like a normal HTML form? By the way, I know that I can do it in different ways using javascript, but I would like to understand whether it can only be done using MVC helplars and Ajax lib...
Read more

c++ - QtQuick: QQmlApplicationEngine failed to load component qrc:/main.qml:23 Invalid attached object assignment -

Looking at my thoughts below, am I barking the wrong tree? Or in the information given below, am I misusing the Qt API to get an error in the title? I'm trying to modify the sample to work with the default coefficic project generated from Qt Creator 3.3.0 (OpenSource). Qt 5.4.0 (GCC 4.6.1, 64bit) Based on. The first thing to look at after the code is that I stand by: The sample uses the main.cpp: qmlRegisterType & lt ; Squircle & gt; ("OpenGLUARMM", 1, 0, "Squircle"); QQuickView view; View.setResizeMode (QQuickView :: SizeRootObjectToView); View.setSource (QUrl ("QRC: ///scenegraph/openglunderqml/main.qml")); View.show (); Some name changes in my name. CPP qmlRegisterType & lt; Menuscreen & gt; ("OpenGLUnderQML", 1, 0, "Main Screen"); QQmlApplicationEngine engine; Engine.load (QUrl (QStringLiteral ("QRC: /main.qml"))); I'm not sure that the difference in using QQmlApplicationEngine...
Read more