如何测试选择项是否完全在范围内?

时间:2018-09-04 03:02:56

标签: excel vba excel-vba intersection named-ranges

所以我发现了类似的东西: VBA test if cell is in a range

但是,这似乎在测试(据我了解),如果所选的单元格与该范围相交。但是,我需要找到一种方法来确认所选范围是否完全在该范围内,以便可以将宏限制为仅在指定的单元格范围内工作。

这是到目前为止我得到的。...我将所选单元格命名为范围(sel_rng),并将其设置为变量。...然后,我将可接受范围命名为命名范围(okay_rng) ....然后(希望...。但这是我仍然不清楚如何实现的部分)如果“ sel_rng”完全位于“ okay_rng”之内,我想抓住“ sel_rng”并将其合并,否则抛出错误”

Sub Merge_Cells()
'
' Merge_Cells Macro
Dim selcells As Range
Selection.Name = "sel_rng"
selcells = Range("sel_rng")

Dim okayrng As Integer
okayrng = Range("itemrows").Value + 28
ActiveSheet.Range("C29:C" & okayrng).Select
Selection.Name = "okay_rng"



Range("sel_rng").Select
Selection.Merge

有没有人?

1 个答案:

答案 0 :(得分:0)

两个范围的交集将确定一个范围是否完全在另一范围内。

public class PersonConfiguration : EntityTypeConfiguration<Person>
{
    public PersonConfiguration()
    {
        ToTable("Persons");
        HasKey(x => x.PersonId)
            .Property( x=> x.PersonId)
            .HasDatabaseGeneratedOption(DatabaseGeneratedOption.Identity);

        HasOne(x => x.User)
            .WithRequiredDependency()
            .HasForeignKey(x => x.PersonId);
    }
}

public class UserConfiguration : EntityTypeConfiguration<User>
{
    public PersonConfiguration()
    {
        ToTable("Users");
        HasKey(x => x.PersonId);
    }
}
顺便说一句,相交可能没有。您应该为此添加错误处理。